Foxtable(狐表) → 用户栏目 → 专家坐堂 → 统计表生成的问题


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

主题：统计表生成的问题
帅哥哟，离线，有人找我吗？
bagabaga
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：138 积分：1325 威望：0 精华：0 注册：2014/3/10 19:43:00 		统计表生成的问题  发帖心情 Post By：2014/3/30 20:34:00 [只看该作者]

'用SQL语句生成临时表
Dim cmd As New SQLCommand
Dim dt As DataTable
'cmd.C
cmd.CommandText = "SELECT   科目, 项目名称 , 合计 , 用户 FROM {项目费用表} WHERE 合计 < 0 And 用户 = '工程'"   
dt = cmd.ExecuteReader()
'对临时进行分组统计
Dim b As New GroupTableBuilder("统计表", dt)
b.Groups.AddDef("用户")
b.Groups.AddDef("科目")
b.Groups.AddDef("项目名称")
b.Groups.AddDef("合计")
图片点击可在新窗口打开查看此主题相关图片如下：统计表.png
图片点击可在新窗口打开查看
b.GrandProportion = True
B.SubtotalLevel = 2 '只生成总计行
b.Build()
MainTable = Tables("统计表")

以上代码怎么不生成合计，b.GrandProportion = True 也没看到
请教
 回到顶部
帅哥哟，离线，有人找我吗？
bagabaga
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：138 积分：1325 威望：0 精华：0 注册：2014/3/10 19:43:00 		  发帖心情 Post By：2014/3/30 20:35:00 [只看该作者]

'用SQL语句生成临时表
Dim cmd As New SQLCommand
Dim dt As DataTable
'cmd.C
cmd.CommandText = "SELECT   科目, 项目名称 , 合计 , 用户 FROM {项目费用表} WHERE 合计 < 0 And 用户 = '工程'"   
dt = cmd.ExecuteReader()
'对临时进行分组统计
Dim b As New GroupTableBuilder("统计表", dt)
b.Groups.AddDef("用户")
b.Groups.AddDef("科目")
b.Groups.AddDef("项目名称")
b.Groups.AddDef("合计")
b.GrandProportion = True
B.SubtotalLevel = 2 '只生成总计行
b.Build()
MainTable = Tables("统计表")
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2014/3/30 20:40:00 [只看该作者]

 是汇总模式么？

 

http://www.foxtable.com/help/topics/2669.htm

 

 

b.Subtotal = True '生成汇总模式
b.SubtotalLevel = 0 '只生成总计行
 回到顶部
帅哥哟，离线，有人找我吗？
bagabaga
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：138 积分：1325 威望：0 精华：0 注册：2014/3/10 19:43:00 		  发帖心情 Post By：2014/3/30 20:49:00 [只看该作者]

Dim b As New GroupTableBuilder("统计表", dt)
b.Groups.AddDef("用户")
b.Groups.AddDef("科目")
b.Groups.AddDef("项目名称")
b.Groups.AddDef("合计")
b.GrandProportion = True
b.Subtotal = True '生成汇总模式
出现索引出现负值，出错
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2014/3/30 21:16:00 [只看该作者]

 呃，你没有统计任意一列啊！你的是不是这个意思？

 

Dim cmd As New SQLCommand
Dim dt As DataTable
'cmd.C
cmd.CommandText = "SELECT   科目, 项目名称 , 合计 , 用户 FROM {项目费用表} WHERE 合计 < 0 And 用户 = '工程'"   
dt = cmd.ExecuteReader()
'对临时进行分组统计
Dim b As New GroupTableBuilder("统计表", dt)
b.Groups.AddDef("用户")
b.Groups.AddDef("科目")
b.Groups.AddDef("项目名称")
b.Totals.AddDef("合计")
b.GrandProportion = True
b.Subtotal = True '生成汇总模式
B.SubtotalLevel = 2 '只生成总计行
b.Build()
MainTable = Tables("统计表")
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 4 次数据查询