- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 行数统计问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=77847)
-- 发布时间：2015/11/26 14:23:00
-- 行数统计问题
之前看到过每个月统计业务量的介绍，找不到了。
比如我现在要根据客户统计每个月的25日到下个月25日的业务量，也就是数据的行数，怎么写代码？
-- 发布时间：2015/11/26 14:26:00
--
这个？
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=68303&skin=0
-- 发布时间：2015/11/26 14:37:00
--
哈哈，
，谢谢
-- 发布时间：2015/11/26 14:41:00
--
额，有点不对，我不要统计数值，而是需要统计出业务的票数，就是行数就可以，比如这个月做了100票业务，那么就有100行，我要知道几行就可以了。
-- 发布时间：2015/11/26 14:51:00
--
compute函数，指定为count
http://www.foxtable.com/help/topics/0393.htm
如果要用2楼的，指定一下统计类型 AggregateEnum.Count
http://www.foxtable.com/help/topics/1626.htm
-- 发布时间：2015/11/26 16:38:00
--
此主题相关图片如下：订单数.png
Dim dr As DataRow = e.DataRow
Dim dt As DataTable = DataTables("订单")
If e.DataCol.Name = "产品" Then
dr("数量") = dt.Compute("Sum(数量)","[产品] = \'" & dr("产品") & "\'")
dr("金额") = dt.Compute("Sum(金额)","[产品] = \'" & dr("产品") & "\'")
End If
后面订单数代码如何加进去
-- 发布时间：2015/11/26 16:42:00
--
Dim cnt As Integer
cnt = DataTables("订单").Compute("Count([客户])", "雇员 = \'EP01\' And 数量 > 500")
Output.Show("订单数:" & cnt)
这个代码写进去，貌似没有用
-- 发布时间：2015/11/26 16:57:00
--
Dim g As New GroupTableBuilder("统计表1", DataTables("订单"))
g.Groups.AddDef("产品")
g.Totals.AddDef("数量")
g.Totals.AddDef("金额")
g.Totals.AddDef("客户", AggregateEnum.Count)
g.Build()
MainTable = Tables("统计表1")
-- 发布时间：2015/11/26 17:06:00
--
Dim dr As DataRow = e.DataRow
Dim dt As DataTable = DataTables("订单")
If e.DataCol.Name = "产品" Then
dr("数量") = dt.Compute("Sum(数量)","[产品] = \'" & dr("产品") & "\'")
dr("金额") = dt.Compute("Sum(金额)","[产品] = \'" & dr("产品") & "\'")
dr("订单数") = dt.Compute("Count(产品)","[产品] = \'" & dr("产品") & "\'")
End If
-- 发布时间：2015/11/27 13:54:00
--
谢谢[大红袍】【HYPHEN]，解决问题了，