Foxtable(狐表)用户栏目专家坐堂 → 统计表的时段筛选


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

主题:统计表的时段筛选

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/29 10:23:00 [显示全部帖子]

bd2.Filter="dDate>#" & new Date(2015, 1, 1) & "#"

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/29 10:57:00 [显示全部帖子]

 那就说明没有符合条件的数据,请好好看看你的 dDate列

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/29 11:00:00 [显示全部帖子]

 看7楼,如果有数据,试试用SQLGroupTableBuilder

 

http://www.foxtable.com/help/topics/1626.htm

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/29 11:18:00 [显示全部帖子]

 Dim b As New SQLGroupTableBuilder("统计表1","P_OutList")
b.Filter="dDate > '" & new Date(2015, 1, 1) & "'"
b.Groups.AddDef("cPCode","产品编号")
b.Totals.AddDef("nOAmount","销售数量")
b.Build
MainTable = Tables("统计表1")

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/29 14:11:00 [显示全部帖子]

 写错了,不可能不行。不行就请上传例子说明

 

bd2.Filter = "[dDate] > #" & Tables("采购统计日期").current("起始日期") & "#" 

 

 或者

 

bd2.Filter = "[dDate] > '" & Tables("采购统计日期").current("起始日期") & "'" 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/29 15:28:00 [显示全部帖子]

改成这样看卡

 

[dDate] > '2015-01-01'

 

或者

 

[dDate] > #2015/01/01#

 

不行,就做个例子上来


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/29 15:42:00 [显示全部帖子]

无语

 

Dim bd2 As New GroupTableBuilder("统计表2",DataTables("订单"))
Dim dt2 As fxDataSource
bd2.FromServer = True
bd2.Filter = "[日期] > #2000-01-01# "
 'bd2.Filter = "[产品ID] = 'P05'"    
bd2.Groups.AddDef("产品ID")  '根据型号分组
bd2.Totals.AddDef("数量") '对数量进行统计
dt2 = bd2.BuildDataSource()
dt2.Show("统计表2") '显示统计结果


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/29 16:34:00 [显示全部帖子]

 代码没有问题

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/29 17:59:00 [显示全部帖子]

Dim bd1 As New GroupTableBuilder("统计表2", DataTables("P_OutList"))
Dim dt1 As fxDataSource
bd1.FromServer = True
bd1.Groups.AddDef("cPCode")
bd1.Totals.AddDef("nOAmount")
bd1.Filter = "[dDate] > '2013-03-01'"

dt1 = bd1.BuildDataSource()
dt1.Show("统计表2") '显示统计结果


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/29 18:00:00 [显示全部帖子]

 看楼上,看10楼啊

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