- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 后台加载数据生成报表出现问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=111127)
-- 发布时间：2017/12/15 16:18:00
-- 后台加载数据生成报表出现问题
"S计量统计表”与"S征地明细"有关联，我在某个窗口按钮写如下代码，想实现当选择"S计量统计表”某一行时，点击按钮能从后台提取"S征地明细"表未加载的数据来生成 某一期结算的报表。代码不正确，请老师指点
Dim Book As New XLS.Book(ProjectPath & "Attachments\\征地明细表_报表2.xls")
Dim fl As String = ProjectPath & "Reports\\征地明细表_报表2.xls"
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()
此主题相关图片如下：yaujqcbu5`7xkwj89uugepi.png
-- 发布时间：2017/12/15 16:21:00
--
DataTables("S征地明细").LoadFilter = "关联列名 = \'" & Tables("S计量统计表").current("关联列名") & "\'"
DataTables("S征地明细").Load
Dim Book As New XLS.Book(ProjectPath & "Attachments\\征地明细表_报表2.xls")
Dim fl As String = ProjectPath & "Reports\\征地明细表_报表2.xls"
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()
-- 发布时间：2017/12/15 16:40:00
--
是通过三个关联列名关联的，“S计量统计表”是父表
-- 发布时间：2017/12/15 16:42:00
--
方法一：
http://www.foxtable.com/webhelp/scr/2894.htm
方法二：
DataTables("S征地明细").LoadFilter = "第一个列 = \'" & Tables("S计量统计表").current("第一个列") & "\' and 第二个列 = \'" & Tables("S计量统计表").current("第二个列") & "\'"