Foxtable(狐表)用户栏目专家坐堂 → 表达式错误


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

主题:表达式错误

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


加好友 发短信
等级:幼狐 帖子:93 积分:734 威望:0 精华:0 注册:2017/9/27 23:52:00
表达式错误  发帖心情 Post By:2018/11/27 23:55:00 [显示全部帖子]

Dim td As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")
Dim y As Integer = td.value.year '指定年份
Dim m As Integer = td.value.month '指定月份
Dim dt11 As New Date(y, m, 1)
Dim dt22 As New Date(y, m, Date.DaysInMonth(y,m)) '获取该月的最后一天
Dim Filter As String
Filter = "单据日期 >= #" & dt11 & "# And 单据日期 <= #" & dt22 & "#" 
Dim Val As Double = DataTables("销售订单").SQLCompute("Sum(数量)","产品分类 = '项目料' and & Filter & "'" )
提示错误,请高手指点一下


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


加好友 发短信
等级:幼狐 帖子:93 积分:734 威望:0 精华:0 注册:2017/9/27 23:52:00
  发帖心情 Post By:2018/11/28 11:30:00 [显示全部帖子]

提示
.NET Framework 版本:2.0.50727.8793
Foxtable 版本:2018.3.9.1
错误所在事件:
详细错误信息:
'#' 附近有语法错误。


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


加好友 发短信
等级:幼狐 帖子:93 积分:734 威望:0 精华:0 注册:2017/9/27 23:52:00
  发帖心情 Post By:2018/11/28 12:35:00 [显示全部帖子]

这个解决了,我是用外部数据库的,#改成'就可以了,谢谢大家

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


加好友 发短信
等级:幼狐 帖子:93 积分:734 威望:0 精华:0 注册:2017/9/27 23:52:00
  发帖心情 Post By:2018/11/28 16:10:00 [显示全部帖子]

Dim bd1 As New GroupTableBuilder("统计表1",DataTables("销售订单"))
Dim dt1 As fxDataSource
Dim td As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")
bd1.Filter = "[单据日期] = '" & td.value & "'"       
bd1.Groups.AddDef("业务员") '根据型号分组
bd1.Groups.AddDef("客户名称") '根据型号分组
bd1.Groups.AddDef("产品分类") '根据型号分组
bd1.Groups.AddDef("物料名称") '根据型号分组
bd1.Totals.AddDef("数量") '对数量进行统计
dt1 = bd1.BuildDataSource()
Tables("销售日报表_Table1").DataSource =dt1'将统计结果绑定到Table
这个代码昨天还能按照日期生成统计表,今天不知道是什么原因不行了,我把bd1.Filter = "[单据日期] = '" & td.value & "'"      这段删除后,又可以了,是不是这个代码的问题呢,请高手指点!

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


加好友 发短信
等级:幼狐 帖子:93 积分:734 威望:0 精华:0 注册:2017/9/27 23:52:00
  发帖心情 Post By:2018/11/28 17:21:00 [显示全部帖子]

弹出来:2018-11-28
改了bd1.Filter = "[单据日期] = '" & td.text & "'"
当天的2018-11-28的报表能出来,但是我选择其他天数就不能显示。
[此贴子已经被作者于2018/11/28 17:29:26编辑过]

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


加好友 发短信
等级:幼狐 帖子:93 积分:734 威望:0 精华:0 注册:2017/9/27 23:52:00
  发帖心情 Post By:2018/11/28 20:37:00 [显示全部帖子]

还是不可以,晕死了,之前那段代码是可以的

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


加好友 发短信
等级:幼狐 帖子:93 积分:734 威望:0 精华:0 注册:2017/9/27 23:52:00
  发帖心情 Post By:2018/11/28 21:09:00 [显示全部帖子]

改了bd1.Filter = "[单据日期] >= '" & td.value & "' and [单据日期] < '" & td.value.adddays(1) & "'"也不可以
我把系统日期改成2018-11-27后,再选择2018-11-28,报表出不来了,是空白的,还是不行

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


加好友 发短信
等级:幼狐 帖子:93 积分:734 威望:0 精华:0 注册:2017/9/27 23:52:00
  发帖心情 Post By:2018/11/28 21:16:00 [显示全部帖子]

我把这个代码取消后,可以加载出来数据的bd1.Filter = "[单据日期] = '" & td.value & "'"  

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


加好友 发短信
等级:幼狐 帖子:93 积分:734 威望:0 精华:0 注册:2017/9/27 23:52:00
  发帖心情 Post By:2018/11/28 21:50:00 [显示全部帖子]

我做了一个实例,是外部数据库的,把窗体复制到实例里,功能是正常的
晕了
实例如下
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试.zip

[此贴子已经被作者于2018/11/28 22:03:04编辑过]

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


加好友 发短信
等级:幼狐 帖子:93 积分:734 威望:0 精华:0 注册:2017/9/27 23:52:00
  发帖心情 Post By:2018/11/28 22:19:00 [显示全部帖子]

这段代码现在变成2018-11-28这个时间统计不出来,其他时间可以统计出来,晕了

现在又不可以了
[此贴子已经被作者于2018/11/28 22:21:45编辑过]

 回到顶部
总数 15 1 2 下一页