以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  分页后导出筛选的所有数据  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=121445)

--  作者:cd_tdh
--  发布时间:2018/7/6 11:52:00
--  分页后导出筛选的所有数据

 

老师,分页加载后,导出筛选数据的sql语句怎么写,需要把下面所有条件都写进去?

导出代码如下:

Dim Book As New XLS.Book(ProjectPath & "Attachments\\合同签订表.xls")
Dim fl As String =  ProjectPath &  "Reports\\合同签订表.xls"
book.AddDataTable("合同签订","外部数据源名称","Select * f  rom {合同签订} where 所属机构= \'贵州分公司\'") 
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()

 

[此贴子已经被作者于2018/7/6 13:41:42编辑过]

--  作者:有点甜
--  发布时间:2018/7/6 12:08:00
--  

 

book.AddDataTable("合同签订","外部数据源名称","Select * from {合同签订} where " & DataTables("合同签订").LoadFilter)

 

[此贴子已经被作者于2018/7/6 12:08:57编辑过]