以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]存储过程怎么查询多个语句，显示出来？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=187130)
--  作者：YOU
--  发布时间：2023/6/25 11:21:00
--  [求助]存储过程怎么查询多个语句，显示出来？

存储过程怎么查询多个语句，显示出来？红色部分语句怎么填？


假定在SQL Server创建了一个存储过程：

CREA TE PROCEDU RE GetOrders
    @日期 VARCHAR(88)="2023-06-18"

AS
BEGIN
    SEL ECT * FROM 区域 WHERE 日期=@日期


    SEL ECT * FROM 分组 WHERE 日期=@日期


    SEL ECT * FROM 店型 WHERE 日期=@日期


      SEL ECT * FROM 门店 WHERE 日期=@日期

END


用EXEC语句执行存储过程：

Dim cm d As new SQLCo mmand
cm d.ConnectionName = "数据源名称"
cm d.Command Text = "EXEC GetOrders ?"
cm d.Paramet ers.Add("@客户","联想")
Dim dt As DataT able = cmd.Execu teReader


Dim sqlGuid As String = Guid.NewGuid().ToString("N") \'定义Guid
Dim Book As New XLS.Book(ProjectPath & "Attachments\\综合报表.xlsx")
Dim fl As String = ProjectPath" & sqlGuid & ".xlsx"
\'Dim fl As String = ProjectPath & "Reports\\" & sqlGuid & ".xlsx"
book.AddDataTable("区域1", "LCTCM", ma.ToString) \'添加父表
book.AddDataTable("分组2", "LCTCM", mb.ToString) \'添加子表
book.AddDataTable("店型3", "LCTCM", mc.ToString) \'添加子表
book.AddDataTable("门店4", "LCTCM", md.ToString) \'添加子表
book.AddRelation("区域1", "日期", "店型2", "日期") \'建立关联
book.AddRelation("区域1", "日期", "分组3", "日期") \'建立关联
book.AddRelation("区域1", "日期", "门店4", "日期") \'建立关联
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
--  作者：有点蓝
--  发布时间：2023/6/25 11:27:00
--  
book.AddDataTable仅支持sql语句，不能使用存储过程
--  作者：YOU
--  发布时间：2023/6/25 13:51:00
--  
语句代码太长了，有没有办法处理？
--  作者：有点蓝
--  发布时间：2023/6/25 13:58:00
--  
没有的，只能这样用