Foxtable(狐表)用户栏目专家坐堂 → SQLGroupTableBuilder


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

主题:SQLGroupTableBuilder

帅哥哟,离线,有人找我吗?
石四
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:972 积分:7048 威望:0 精华:0 注册:2013/3/31 10:33:00
SQLGroupTableBuilder  发帖心情 Post By:2014/7/3 15:54:00 [只看该作者]

参考

示例三

统计结果可以来自任意多个表,例如要按年统计每个客户订购不同产品的数量:

Dim b As New SQLGroupTableBuilder("统计表1","订单")
b.ConnectionName =
"Sale"
b.AddTable(
"订单","产品ID","产品","产品ID") '添加统计表
b.AddTable(
"订单","客户ID","客户","客户ID") '添加统计表
b.Groups.AddDef(
"客户名称") '根据产品名称分组
b.Groups.AddDef(
"日期", DateGroupEnum.Year, "年") '根据日期按年分组
b
.Groups.AddDef("产品名称") '根据产品名称分组
b.Totals.AddDef(
"数量") '对数量进行统计
b.Build
'生成统计表
Maintable
= Tables("统计表1")
'打开生成的统计表

 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:事例.zip

三个表:计划,登记,工序表

 

Dim b As New SQLGroupTableBuilder("统计表1","登记")

b.C

b.AddTable("登记","批次","计划","批次") '添加统计表

b.AddTable("登记","工序码","工序表","工序码") '添加统计表

b.Groups.AddDef("批次")

b.Groups.AddDef("零件名称")

b.Groups.AddDef("工序名称")

b.Totals.AddDef("数量") '对数量进行统计

b.Totals.AddExp("金额","数量 * 单价")

b.Build '生成统计表

MainTable = Tables("统计表1")

 

执行后报错,将蓝色字体代码屏蔽后能通过,三个表统计不行,两个表的可以,是哪里问题?

 


 


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

 代码

 

Dim b As New SQLGroupTableBuilder("统计表1","登记")

b.ConnectionName= "sl"

b.AddTable("登记","批次","计划","批次") '添加统计表

b.AddTable("登记","工序码","工序表","工序码") '添加统计表

b.Groups.AddDef("{登记}.批次")

b.Groups.AddDef("零件名称")

b.Groups.AddDef("工序名称")

b.Totals.AddDef("{登记}.数量") '对数量进行统计

b.Totals.AddExp("金额","{登记}.数量 * 单价")

b.Build '生成统计表


 回到顶部