以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于表的查询问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=147567)

--  作者:zhangjin
--  发布时间:2020/3/19 16:07:00
--  关于表的查询问题
有两张表,一张是客户表,一张是订单表,如何查询可以看到每月或每个季度,有那些客户没有订货,把这些客户列出来
--  作者:有点蓝
--  发布时间:2020/3/19 16:25:00
--  
上传具体实例测试
--  作者:zhangjin
--  发布时间:2020/3/19 17:55:00
--  表查询

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

--  作者:有点蓝
--  发布时间:2020/3/20 8:36:00
--  
请把截图这个项目文件上传上来
--  作者:有点蓝
--  发布时间: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
--  发布时间:2020/3/20 14:49:00
--  表查询问题
提示出错
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目9.zip


--  作者:有点蓝
--  发布时间: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
--  发布时间: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
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2020/3/22 22:54:00
--  
Tables("维保查询_Table1").Fill(SQL,"数据源名称",True)