Foxtable(狐表)用户栏目专家坐堂 → 关于表的查询问题


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

主题:关于表的查询问题

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


加好友 发短信
等级:幼狐 帖子:55 积分:552 威望:0 精华:0 注册:2019/12/4 20:42:00
关于表的查询问题  发帖心情 Post By:2020/3/19 16:07:00 [只看该作者]

有两张表,一张是客户表,一张是订单表,如何查询可以看到每月或每个季度,有那些客户没有订货,把这些客户列出来

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


加好友 发短信
等级:超级版主 帖子:107730 积分:547983 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/19 16:25:00 [只看该作者]

上传具体实例测试

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


加好友 发短信
等级:幼狐 帖子:55 积分:552 威望:0 精华:0 注册:2019/12/4 20:42:00
表查询  发帖心情 Post By:2020/3/19 17:55:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:1584607650(1).png
图片点击可在新窗口打开查看
表中客户表和订单表,我想做个查询,来查一下,某月或某季度都没有来这消费记录的客户,这样好跟客户联系。这样查询要怎么做了
图片点击可在新窗口打开查看此主题相关图片如下:1584607633(1).png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:超级版主 帖子:107730 积分:547983 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/20 8:36:00 [只看该作者]

请把截图这个项目文件上传上来

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


加好友 发短信
等级:超级版主 帖子:107730 积分:547983 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/20 8:45:00 [只看该作者]

比如

Dim g As New GroupTableBuilder("统计表1", DataTables("订单"))
g.Groups.AddDef("客户名称")
g.Groups.AddDef("日期", DateGroupEnum.Year, "年")
g.Groups.AddDef("日期", "月")
g.Totals.AddDef("客户名称", AggregateEnum.Count,"次数")
g.Filter = "客户名称 is not null"
Dim dt1 As fxDataSource
dt1 = g.BuildDataSource()

Dim jb As New SQLJoinTableBuilder("查询表1","客户")
jb.AddCols("客户名称")
jb.Filter = "客户名称 is not null"
Dim dt2 As fxDataSource
dt2 = jb.BuildDataSource()

dt2.Combine("客户名称",dt1,"客户名称")
dt2.show("查询表1")

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


加好友 发短信
等级:幼狐 帖子:55 积分:552 威望:0 精华:0 注册:2019/12/4 20:42:00
表查询问题  发帖心情 Post By:2020/3/20 14:49:00 [只看该作者]

提示出错
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目9.zip


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


加好友 发短信
等级:超级版主 帖子:107730 积分:547983 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/20 15:29:00 [只看该作者]

使用SQL处理

Dim SQL As String = "Select a.客户名称, b.年,b.月,b.次数 from {客户表} As a left join (Select 客户名称,year(时间) As 年,month(时间) As 月,count(客户名称)  as 次数 from {订单} group by 客户名称,year(时间),month(时间)) As b on a.客户名称=b.客户名称"
Tables("窗口1_查询表1").Fill(SQL,"",True)

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


加好友 发短信
等级:幼狐 帖子:55 积分:552 威望:0 精华:0 注册:2019/12/4 20:42:00
表查询  发帖心情 Post By:2020/3/22 21:52:00 [只看该作者]

Dim SQL As String="Se/ect  {网点信息}.网点编号,{网点信息}.网点名称,网点地址,所属分行,网点类型,维保时间 From {网点信息} Inner JOIN {维保记录} ON {维保记录}.[网点编号] = {网点信息}.[网点编号]"
Tables("维保查询_Table1").Fill(SQL,"",True)


这个话有什么问题。如果是直接执行SQl语句没有问题,执行上面语句就出错。提示出错。
图片点击可在新窗口打开查看此主题相关图片如下:1584885026(1).png
图片点击可在新窗口打开查看

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


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

Tables("维保查询_Table1").Fill(SQL,"数据源名称",True)

 回到顶部