Foxtable(狐表)用户栏目专家坐堂 → 多表联合统计查询的方法


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

主题:多表联合统计查询的方法

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


加好友 发短信
等级:二尾狐 帖子:586 积分:4817 威望:0 精华:0 注册:2015/11/22 10:28:00
多表联合统计查询的方法  发帖心情 Post By:2018/1/8 23:27:00 [只看该作者]

想将商品信息表、入库表、出库表 统计成一张表
能力有限,折腾一晚上没弄出来。
请老师帮忙写一下

图片点击可在新窗口打开查看此主题相关图片如下:55.png
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:多表组合.foxdb



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


加好友 发短信
等级:超级版主 帖子:110813 积分:564003 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/1/9 8:38:00 [只看该作者]


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


加好友 发短信
等级:二尾狐 帖子:586 积分:4817 威望:0 精华:0 注册:2015/11/22 10:28:00
  发帖心情 Post By:2018/1/9 8:48:00 [只看该作者]

老师,我想用sql统计的方法,因为数据我是部分加载的

谢谢


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


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


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


加好友 发短信
等级:二尾狐 帖子:586 积分:4817 威望:0 精华:0 注册:2015/11/22 10:28:00
  发帖心情 Post By:2018/1/9 9:14:00 [只看该作者]

照着帮助能做出来,但有个小问题

帮助里只列出了关联字段,我希望能将商品信息所有字段都显示

红框这基表怎么生成,还不太明白

请指点

 

 


图片点击可在新窗口打开查看此主题相关图片如下:11111.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2018/1/9 9:14:13编辑过]

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


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

bd1添加3个分组即可。其余的bd2、bd3添加一个分组。

 

 

bd1.groups.AddDef("商品编号")

bd1.groups.AddDef("商品名称")

bd1.groups.AddDef("规格型号")


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


加好友 发短信
等级:二尾狐 帖子:586 积分:4817 威望:0 精华:0 注册:2015/11/22 10:28:00
  发帖心情 Post By:2018/1/9 22:36:00 [只看该作者]

老师再帮看下,日期列加入分组后,变成1了

 


图片点击可在新窗口打开查看此主题相关图片如下:666.png
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:多表组合-改1.foxdb


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


加好友 发短信
等级:超级版主 帖子:110813 积分:564003 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/1/9 22:39:00 [只看该作者]

Dim bd1 As New GroupTableBuilder("统计表1",DataTables("商品信息表"))
Dim dt1 As fxDataSource
Dim sts() As String = {"商品编号","商品名称","型号规格","备注"}
For Each st As String In sts
    bd1.Groups.AddDef(st) '根据型号分组
Next
bd1.Groups.AddDef("上架日期",DateGroupEnum.None)

 回到顶部