主题：统计表的时段筛选

Dim bd2 As New GroupTableBuilder("统计表2",DataTables("P_OutList"))
Dim dt2 As fxDataSource
bd2.FromServer = True
bd2.Groups.AddDef("cPCode","产品编号") '根据型号分组
bd2.Totals.AddDef("nOAmount","销售数量") '对数量进行统计

dt2 = bd2.BuildDataSource()
dt2.Show("统计表2")

如果想筛选只统计2015年1月1日以后的销售数量应该  怎么写   谢谢老师帮我看一下

bd2.Filter="日期>#2015-01-01#"

谢谢

 

Dim bd2 As New GroupTableBuilder("统计表2",DataTables("P_OutList"))
Dim dt2 As fxDataSource
bd2.FromServer = True
bd2.Filter="dDate>#2015-01-01#"
bd2.Groups.AddDef("cPCode","产品编号") '根据型号分组
bd2.Totals.AddDef("nOAmount","销售数量") '对数量进行统计
dt2 = bd2.BuildDataSource()
 dt2.Show("统计表2") '显示统计结果

执行代码后统计表中没有任何数据

老师帮我看看什么原因

第四行代码注释后统计数据一切正常

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

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

这样还是不能正常统计数据

统计表是空的

 

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

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

 

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

 

dDate   列是时间日期型   有数据  没有空行  

我用的是sql2000的数据库

 

 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")