以文本方式查看主题

-  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=42261)

--  作者:kunge
--  发布时间:2013/11/7 11:30:00
--  [求助]筛选后,的分组统计,怎么统计筛选后的数据呢?
   筛选后的,分组统计,如果启用历史统计里保存的代码,就可以统计出来,但是我通过代码查看,把代码复制到一个按钮下,统计的还是筛选前的数据。
Dim g As New GroupTableBuilder("产品出库统计", DataTables("产品出库查询"))
g.Groups.AddDef("预约送货日期", "月")
g.Groups.AddDef("预约送货日期", DateGroupEnum.Day, "日")
g.Groups.AddDef("产品编码")
g.Groups.AddDef("产品名称")
g.Totals.AddDef("销售数量")
g.Build()
MainTable = Tables("产品出库统计")

我把这行的
Dim g As New GroupTableBuilder("产品出库统计", DataTables("产品出库查询"))

DateTables 改成Table,提示错误!

怎么改呢?或者怎么调用这个历史统计呢?

--  作者:狐狸爸爸
--  发布时间:2013/11/7 11:55:00
--  
Dim g As New GroupTableBuilder("产品出库统计", DataTables("产品出库查询"))
g.Groups.AddDef("预约送货日期", "月")
g.Groups.AddDef("预约送货日期", DateGroupEnum.Day, "日")
g.Groups.AddDef("产品编码")
g.Groups.AddDef("产品名称")
g.Totals.AddDef("销售数量")
g.Filter = Tables("产品出库查询").Filter
g.Build()
MainTable = Tables("产品出库统计")

--  作者:Bin
--  发布时间:2013/11/7 11:56:00
--  
打开系统菜单,然后查看历史统计按钮的代码即可.