以文本方式查看主题 -  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=111526)

--  作者：aza520 --  发布时间：2017/12/23 20:57:00 --  不同选择报表生成差异问题 选定第1期的时候可以正确生成报表，先第2期的时候却是生成空表，不知道什么原因，求老师指点 “征地报表”按钮代码： DataTables("S征地明细").LoadFilter = "项目名称 = \'" & Tables("S征地计量统计表").current("项目名称") & "\'" DataTables("S征地明细").LoadFilter = " 县区= \'" & Tables("S征地计量统计表").current("县区") & "\'" 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() 此主题相关图片如下：qq图片20171223205342.png

--  作者：有点甜 --  发布时间：2017/12/24 15:19:00 --   DataTables("S征地明细").LoadFilter = "项目名称 = \'" & Tables("S征地计量统计表").current("项目名称") & "\' and 县区= \'" & Tables("S征地计量统计表").current("县区") & "\' and 第几期结算 = \'" & Tables("S征地计量统计表").current("第几期结算") & "\'"

--  作者：aza520 --  发布时间：2017/12/24 17:38:00 --   显示：字符串的语法错误 在查询表达式 \'(项目名称 = \'富丹路一期\' and 县区= \'融水县\' and 第几期结算 = \'1\'\')\' 中。

--  作者：aza520 --  发布时间：2017/12/24 17:59:00 --   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 老师，我改成这样OK了