- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 为何一直出错b.Groups.AddDef("日期",DateGroupEnum.Year,"年") (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=71378)
-- 发布时间：2015/7/10 10:46:00
-- 为何一直出错b.Groups.AddDef("日期",DateGroupEnum.Year,"年")
b.Groups.AddDef("日期",DateGroupEnum.Year,"年") 一直出错??
此主题相关图片如下：err.jpg
-- 发布时间：2015/7/10 11:27:00
--
你确定是这句代码运行的时候，就出错？
有出错的例子吗？
-- 发布时间：2015/7/10 16:49:00
--
帮助中的例子
-- 发布时间：2015/7/10 17:03:00
--
说明具体的例子，或者上传具体的例子。
-- 发布时间：2015/7/10 17:24:00
--
请看...
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:sql分页加载树.zip |
-- 发布时间：2015/7/10 17:44:00
--
Dim dt As DataTable
Dim b As New SQLGroupTableBuilder("统计表1","订单")
b.ConnectionName = "sql"
b.Groups.AddDef("日期",DateGroupEnum.Year,"年")
b.Groups.AddDef("日期",DateGroupEnum.Month,"月")
b.Groups.AddDef("产品")
b.Totals.AddDef("产品",AggregateEnum.Count,"订单数") \'根据主键列来统计记录数,也就是订单数
dt = b.Build(False) \'参数设置为False,生成一个临时表,不在主界面显示
\'然后根据统计表生成目录树
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree(dt, "年|月|产品")
For Each nd As winform.treenode In trv.allnodes
Dim sum As Integer = 0
Select Case nd.level
Case 0
sum = dt.compute("sum(订单数)","年 = " & nd.DataRow("年"))
nd.text = nd.text & "年(" & sum & "條)"
Case 1
sum = dt.compute("sum(订单数)","年 = " & nd.DataRow("年") & " and 月 = " & nd.DataRow("月"))
nd.text = nd.text & "月(" & sum & "條)"
Case 2
sum = nd.DataRow("订单数")
nd.text = nd.text & " (" & sum & "條)"
End Select
Next
trv.nodes.Insert("顯示所有資料","顯示所有資料 (" & dt.compute("sum(订单数)") & "條)",0)
-- 发布时间：2015/7/10 17:49:00
--
為何是 "产品" ,我是依帮助中_identify 阿
-- 发布时间：2015/7/10 17:53:00
--
為何是 "产品" ,我是依帮助中_identify 阿
你的表里面没有 _Identify 列
-- 发布时间：2015/7/10 17:56:00
--
帮助是这样写的啊,_identify 是系统提供的
-- 发布时间：2015/7/10 18:11:00
--
你这个是外部表，只要有主键，就可以不用_Identify列，不是一定有的。