- 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=114312)
-- 发布时间：2018/2/2 17:58:00
-- 后台导出数据的问题
在窗口的“导出明细表”设如下代码，想导出上面记录表里关联的所有数据，现在只能导出第一条记录，请问老师是怎么回事？
Systemready = False
DataTables("S征地明细").loadTop = ""
DataTables("S征地明细").loadpage = 0
DataTables("S征地明细").load
Systemready = True
Dim str = DataTables("S征地记录").SQLGetComboListString("协议书编号", DataTables("S征地记录").LoadFilter)
str = str.replace("|", "\',\'")
DataTables("S征地明细").LoadFilter = "协议书编号 in (\'" & str & "\')"
DataTables("S征地明细").LoadTop = ""
DataTables("S征地明细").LoadPage = 0
DataTables("S征地明细").Load
Dim Book As New XLS.Book(ProjectPath & "Attachments\\征地明细表.xls")
Dim fl As String = ProjectPath & "Reports\\征地明细表.xls"
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()
-- 发布时间：2018/2/2 17:58:00
--
如图：
此主题相关图片如下：qq图片20180202175423.png
-- 发布时间：2018/2/2 17:59:00
--
你excel模板设置有问题
http://www.foxtable.com/webhelp/scr/0201.htm