- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- SQL统计表统计不重复统计问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=102604)
-- 发布时间：2017/6/22 19:49:00
-- SQL统计表统计不重复统计问题
请教老师，在进行SQL统计的时候，下列代码如何应用GetValues统计不重复的行
Dim b As New SQLGroupTableBuilder......
b.Groups.AddDef("日期", DateGroupEnum.Year, "年度")
b.Groups.AddDef("任务人员")
....
b.Totals.AddExp("项目名称","项目名称",AggregateEnum.count)
-- 发布时间：2017/6/23 0:21:00
--
不能统计不重复行。
你需要在生成统计表以后，循环每一行，重新统计赋值。
-- 发布时间：2017/6/24 14:59:00
--
老师，如果是如下列代码已生成统计表后，怎样再从后台循环统计不重复值（如以任务部室为基础，后台统计不重复的项目数量赋值到对应的任务部室）赋值到统计表中
Dim b3 As New SQLGroupTableBuilder("统计表04","个人明细")
b3.C
b3.Groups.AddDef("日期", DateGroupEnum.Year, "年度")
b3.Groups.AddDef("任务部室")
b3.Totals.AddDef("项目编号",AggregateEnum.Count,"参与项目数量")
b3.Totals.AddExp("进度计量","进度计量*1","任务进度",AggregateEnum.Sum)
b3.Totals.AddExp("难度计量","难度计量*1","任务难度",AggregateEnum.Sum)
b3.Filter = "日期 >= \'" & e.Form.Controls("DateTimePicker5").Value & "\' And 日期 <= \'" & e.Form.Controls("DateTimePicker6").Value & "\'"
\'b3.VerticalTotal = True
Tables("总体分析_Table4").DataSource = b3.BuildDataSource()
-- 发布时间：2017/6/24 15:03:00
--
请上传实例测试。不同表结构用法不一样
-- 发布时间：2017/6/24 17:36:00
--
测试文件
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:不重复值测试.zip |
-- 发布时间：2017/6/25 12:43:00
--
请老师帮忙看看，谢谢！
-- 发布时间：2017/6/25 13:28:00
--
Tables("测试_Table1").DataSource = b3.BuildDataSource()
For Each r As Row In Tables("测试_Table1").Rows
r("参与项目数量") = DataTables("表a").sqlGetValues("项目编号", b3.filter & " and 部门 = \'" & r("部门") & "\' and year(日期) = " & r("年度")).count
Next