Foxtable(狐表) → 用户栏目 → 专家坐堂 → 为何一直出错b.Groups.AddDef("日期",DateGroupEnum.Year,"年")


  共有2541人关注过本帖树形打印复制链接

主题：为何一直出错b.Groups.AddDef("日期",DateGroupEnum.Year,"年")
帅哥哟，离线，有人找我吗？
tennis
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1433 积分：10763 威望：0 精华：0 注册：2013/3/29 10:23:00 		为何一直出错b.Groups.AddDef("日期",DateGroupEnum.Year,"年")  发帖心情 Post By：2015/7/10 10:46:00 [只看该作者]

b.Groups.AddDef("日期",DateGroupEnum.Year,"年") 一直出错??

 


图片点击可在新窗口打开查看此主题相关图片如下：err.jpg
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/7/10 11:27:00 [只看该作者]

 你确定是这句代码运行的时候，就出错？

 

 有出错的例子吗？
 回到顶部
帅哥哟，离线，有人找我吗？
tennis
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1433 积分：10763 威望：0 精华：0 注册：2013/3/29 10:23:00 		  发帖心情 Post By：2015/7/10 16:49:00 [只看该作者]

帮助中的例子
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/7/10 17:03:00 [只看该作者]

 说明具体的例子，或者上传具体的例子。

 回到顶部
帅哥哟，离线，有人找我吗？
tennis
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1433 积分：10763 威望：0 精华：0 注册：2013/3/29 10:23:00 		  发帖心情 Post By：2015/7/10 17:24:00 [只看该作者]

请看...
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:sql分页加载树.zip
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：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)
 回到顶部
帅哥哟，离线，有人找我吗？
tennis
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1433 积分：10763 威望：0 精华：0 注册：2013/3/29 10:23:00 		  发帖心情 Post By：2015/7/10 17:49:00 [只看该作者]

為何是 "产品" ,我是依帮助中_identify 阿

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/7/10 17:53:00 [只看该作者]

以下是引用tennis在2015/7/10 17:49:00的发言：
為何是 "产品" ,我是依帮助中_identify 阿

 

你的表里面没有 _Identify 列
 回到顶部
帅哥哟，离线，有人找我吗？
tennis
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1433 积分：10763 威望：0 精华：0 注册：2013/3/29 10:23:00 		  发帖心情 Post By：2015/7/10 17:56:00 [只看该作者]

 帮助是这样写的啊,_identify 是系统提供的

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/7/10 18:11:00 [只看该作者]

 你这个是外部表，只要有主键，就可以不用_Identify列，不是一定有的。

 回到顶部
总数 11 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04297 秒, 5 次数据查询