以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 请问,如何把两组代码产生的临时表数据和在一个表中? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=27694) |
-- 作者:lyfxybc -- 发布时间:2013/1/7 23:34:00 -- 请问,如何把两组代码产生的临时表数据和在一个表中? 请问,如何把两组代码产生的临时表数据和在一个表中?
Dim g As New GroupTableBuilder("统计表1", DataTables("坯布输入")) g.Groups.AddDef("年") g.Groups.AddDef("月") g.Groups.AddDef("产品名称") g.Totals.AddDef("匹数", "下机坯布_累计") g.Totals.AddDef("总长", "长度_累计") g.Totals.AddDef("织造车间扣分", "扣分_累计") g.Totals.AddDef("总重", "重量_累计") b.Decimals = 2 g.FromServer = True g.Build() MainTable = Tables("统计表1")
Dim b As New GroupTableBuilder("统计表2", DataTables("坯布输入")) b.Filter = "日期 >= #" & Date.Today & "# “ b.Groups.AddDef("年") b.Groups.AddDef("月") b.Groups.AddDef("产品名称") b.Totals.AddDef("匹数", "下机坯布_本日") b.Totals.AddDef("总长", "长度_本日") b.Totals.AddDef("织造车间扣分", "扣分_本日") b.Totals.AddDef("总重", "重量_本日") b.Decimals = 2 b.FromServer = True b.Build() MainTable = Tables("统计表2")
|
-- 作者:lin_hailun -- 发布时间:2013/1/8 9:19:00 -- 你看看这个。 http://www.foxtable.com/help/topics/2391.htm |
-- 作者:lyfxybc -- 发布时间:2013/1/8 18:55:00 -- 谢谢 |