Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]如何把统计结果放入表中


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

主题：[求助]如何把统计结果放入表中
帅哥哟，离线，有人找我吗？
明天的灵
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：365 积分：4281 威望：0 精华：0 注册：2017/2/7 7:41:00 		[求助]如何把统计结果放入表中  发帖心情 Post By：2018/11/16 21:58:00 [只看该作者]

Dim d_h As  Date
d_h =DataTables("每日工作量").Compute("Max(操作日期)")   '取得最后操作日期
Dim dt1 As Date = d_h.AddDays(-1) '获取最后操作日期的前一天
Dim Filter As String
Filter = "操作日期 = #" & dt1 & "#"
Dim g As New GroupTableBuilder("上一日产量", DataTables("每日工作量"))
g.Groups.AddDef("操作台")
g.Totals.AddDef("计件数量", "日产量")
g.Filter = Filter
g.Build()
MainTable = Tables("上一日产量")

个Tables("上一日产量"）是统计比最后操作日期前一天的各操作台产量，如何把统计出来的日产量按对应的操作台号，保存到操作台表的“日产量“列中？
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:计件工资1.table
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105957 积分：538860 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2018/11/16 22:08:00 [只看该作者]

Dim d_h As  Date
d_h =DataTables("每日工作量").Compute("Max(操作日期)")   '取得最后操作日期
Dim dt1 As Date = d_h.AddDays(-1) '获取最后操作日期的前一天
Dim Filter As String
Filter = "操作日期 = #" & dt1 & "#"
Dim g As New GroupTableBuilder("上一日产量", DataTables("每日工作量"))
g.Groups.AddDef("操作台")
g.Totals.AddDef("计件数量", "日产量")
g.Filter = Filter
Dim dt As DataTable = g.Build(True)
For Each dr As DataRow In dt.DataRows
    Dim nr As DataRow = DataTables("操作台").Find("操作台号 = '" & dr("操作台") & "'")
    If nr IsNot Nothing Then
        nr("日产量") = dr("日产量")
    End If
Next
 回到顶部
帅哥哟，离线，有人找我吗？
明天的灵
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：365 积分：4281 威望：0 精华：0 注册：2017/2/7 7:41:00 		  发帖心情 Post By：2018/11/16 22:20:00 [只看该作者]

谢谢蓝版主！
Dim dt As DataTable = g.Build(True) 这句是关键，想不统计生成的表，还能映射成DataTable，是不是g.Build() 一定带True参数？ 
想额外请教下。
 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105957 积分：538860 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2018/11/16 22:53:00 [只看该作者]

是的，一定带True参数

 回到顶部
帅哥哟，离线，有人找我吗？
明天的灵
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：365 积分：4281 威望：0 精华：0 注册：2017/2/7 7:41:00 		  发帖心情 Post By：2018/11/17 10:29:00 [只看该作者]

终于在帮助中找到原文解释了（Build方法有一个可选参数，如果设为True，将只生成一个临时的DataTable，而不生成Table）.谢谢！

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03516 秒, 5 次数据查询