主题：统计每月日期出现次数

如果是内部数据源

Dim g As New CrossTableBuilder("统计表1", "Select distinct 客户,订货时间 from {表B}")

 

如果是外部数据源

Dim g As New CrossTableBuilder("统计表1", "Select distinct 客户,订货时间 from {表B}","这里填数据源名")
g.HGroups.AddDef("订货时间", "月")
g.VGroups.AddDef("客户")
g.Totals.AddDef("客户", AggregateEnum.Count, "客户")
g.Build()
MainTable = Tables("统计表1")

 

测试没问题。请上传实例测试。

在这个测试窗口，测试sql语句，看是否报错

 

http://www.foxtable.com/webhelp/scr/1484.htm

 

 

拷贝select from语句进去运行。

 

原来的代码不变。把{订货明细}改成{2015-2017订货明细}

 

Dim dt As DataTable
Dim cmd As new SQLCommand
cmd.ConnectionName = "数据源名"
cmd.CommandText = "Select distinct 客户,订货时间 from {表E}"
dt = cmd.ExecuteReader
Dim g As New CrossTableBuilder("统计表1", dt)
g.HGroups.AddDef("客户")
g.VGroups.AddDef("订货时间", DateGroupEnum.Year, "{0}年")
g.VGroups.AddDef("订货时间", "{0}月")
g.Totals.AddDef("客户", AggregateEnum.Count, "客户")
g.Build()
MainTable = Tables("统计表1")