Foxtable(狐表)用户栏目专家坐堂 → 不同选择报表生成差异问题


  共有1399人关注过本帖树形打印复制链接

主题:不同选择报表生成差异问题

帅哥哟,离线,有人找我吗?
aza520
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:689 积分:5155 威望:0 精华:0 注册:2017/10/22 10:15:00
不同选择报表生成差异问题  发帖心情 Post By: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
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/12/24 15:19:00 [只看该作者]

DataTables("S征地明细").LoadFilter = "项目名称 = '" & Tables("S征地计量统计表").current("项目名称") & "' and 县区= '" & Tables("S征地计量统计表").current("县区") & "' and 第几期结算 = '" & Tables("S征地计量统计表").current("第几期结算") & "'"

 回到顶部
帅哥哟,离线,有人找我吗?
aza520
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:689 积分:5155 威望:0 精华:0 注册:2017/10/22 10:15:00
  发帖心情 Post By:2017/12/24 17:38:00 [只看该作者]

显示:字符串的语法错误 在查询表达式 '(项目名称 = '富丹路一期' and 县区= '融水县' and 第几期结算 = '1'')' 中。

 回到顶部
帅哥哟,离线,有人找我吗?
aza520
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:689 积分:5155 威望:0 精华:0 注册:2017/10/22 10:15:00
  发帖心情 Post By: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了

 回到顶部