以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎样在统计按钮中加入排除重复行的公式  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=3044)

--  作者:卟离卟弃
--  发布时间:2009/6/5 14:26:00
--  怎样在统计按钮中加入排除重复行的公式
Dim g As New CrossTableBuilder("年份定单数量统计", DataTables("业务定单"), "[客户] = \'MLC\'")
g.HGroups.AddDef("定单日期", "月")
g.VGroups.AddDef("定单日期", DateGroupEnum.Year, "{0}年")
g.Totals.AddDef("定单号", AggregateEnum.Count, "定单数量")
g.Build()
MainTable = Tables("年份定单数量统计")


这是统计公式。统计列是定单数量,怎么样增加一个排除重复行的公式(只对定单数量列)。。。


--  作者:kylin
--  发布时间:2009/6/5 14:56:00
--  
首先构造一个排除重复行的DataTable

Dim
cmd As New SQLCommand
Dim
dt As DataTable
cmd.CommandText = "Select 客户,定单日期,定单号,DISTINCT 定单数量 From {业务定单}  "
dt = cmd.ExecuteReader()
其二
Dim g As New CrossTableBuilder("年份定单数量统计", dt, "[客户] = \'MLC\'")
以下省略

供你参考

--  作者:卟离卟弃
--  发布时间:2009/6/5 16:00:00
--  
Dim dt As DataTable
               DataTables("业务定单"),

Dim g As New CrossTableBuilder("年份定单数量统计", dt, "[客户] = \'MLC\'")
Dim g As New CrossTableBuilder("年份定单数量统计", DataTables("业务定单"), "[客户] = \'MLC\'")

行不通呢。

--  作者:kylin
--  发布时间:2009/6/5 17:46:00
--  
以下是引用卟离卟弃在2009-6-5 16:00:00的发言:
Dim dt As DataTable
               DataTables("业务定单"), 

???
做个项目吧,我有点不明白你的提问了


--  作者:mr725
--  发布时间:2009/6/5 18:28:00
--  
以下是引用卟离卟弃在2009-6-5 14:26:00的发言:
Dim g As New CrossTableBuilder("年份定单数量统计", DataTables("业务定单"), "[客户] = \'MLC\'")
g.HGroups.AddDef("定单日期", "月")
g.VGroups.AddDef("定单日期", DateGroupEnum.Year, "{0}年")
g.Totals.AddDef("定单号", AggregateEnum.Count, "定单数量")
g.Build()
MainTable = Tables("年份定单数量统计")


这是统计公式。统计列是定单数量,怎么样增加一个排除重复行的公式(只对定单数量列)。。。

怎么会有重复行呢????????    俺有点反应不灵了~ 呵呵,


--  作者:kylin
--  发布时间:2009/6/5 18:42:00
--  
以下是引用kylin在2009-6-5 14:56:00的发言:
首先构造一个排除重复行的DataTable

Dim
cmd As New SQLCommand
Dim
dt As DataTable
cmd.CommandText = "Select 客户,定单日期,定单号,DISTINCT 定单数量 From {业务定单}  "
dt = cmd.ExecuteReader()
其二
Dim g As New CrossTableBuilder("年份定单数量统计", dt, "[客户] = \'MLC\'")
以下省略

供你参考

这是个思路,希望能引起你自己的思考