Foxtable(狐表)用户栏目专家坐堂 → [求助]查询出错


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

主题:[求助]查询出错

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


加好友 发短信
等级:幼狐 帖子:130 积分:1255 威望:0 精华:0 注册:2017/4/14 21:52:00
[求助]查询出错  发帖心情 Post By:2017/7/17 10:20:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:360截图20170717101515493.jpg
图片点击可在新窗口打开查看

Dim bm As String = "查询表"
Dim jb As New SQLJoinTableBuilder(bm,"购买记录")
jb.C '使用外部表,一定要设置数据源名称
jb.AddTable("购买记录","金卡号","JK_客户基本信息","金卡号")
jb.AddCols("专卖店",True)
jb.AddCols("客户分类",True)
jb.AddCols("{JK_客户基本信息}.金卡号",True)
jb.AddCols("姓名",True)
jb.AddCols("性别",True)
jb.AddCols("年龄",True)
jb.AddCols("电话",True)
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table

jb.AddCols("手机",True)
jb.AddExp("最后日期","Max(购买时间)")
jb.AddCols("产品种类",True)
jb.AddCols("产品数量",True)
jb.AddCols("服用人数",True)
jb.AddCols("症状",True)
jb.AddCols("{JK_客户基本信息}.备注",True)
jb.AddCols("服务人员",True)
jb.Build()
MainTable = Tables(bm)

请教各位老师如何显示客户下订购每种产品类型的最后一次日期???代码是哪里不对?


我需要求得每个客户订购每个产品最后一次时间及数量
[此贴子已经被作者于2017/7/17 11:18:11编辑过]

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


加好友 发短信
等级:幼狐 帖子:130 积分:1255 威望:0 精华:0 注册:2017/4/14 21:52:00
回复:(有点甜)报什么错?请做个例子上来测试。代码...  发帖心情 Post By:2017/7/17 11:21:00 [显示全部帖子]

Dim bm As String = "查询表"
Dim jb As New SQLJoinTableBuilder(bm,"JK_客户基本信息")
jb.C '使用外部表,一定要设置数据源名称
jb.AddTable("JK_客户基本信息","金卡号","购买记录","金卡号")
jb.AddCols("{JK_客户基本信息}.金卡号",True)
jb.AddCols("专卖店","客户分类","姓名","性别","年龄","服用人数","症状","服务人员","电话","手机","产品种类",True)
jb.AddExp("最后日期","Max(购买时间)")
jb.AddCols("{JK_客户基本信息}.备注",True)
jb.Build()
MainTable = Tables(bm)

之前的代码我改成这样了,能查询每个客户订购产品种类的最后一次日期,可是我加入订购产品数量时,查询出来的数据就不是每个产品的最后一次购买时间,而是客户所有产品购买时间

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


加好友 发短信
等级:幼狐 帖子:130 积分:1255 威望:0 精华:0 注册:2017/4/14 21:52:00
回复:(有点甜)Dim bm As String = "查询表"Dim jb ...  发帖心情 Post By:2017/7/17 12:17:00 [显示全部帖子]

老师,我执行命令,代码报错
图片点击可在新窗口打开查看此主题相关图片如下:360截图20170717121615412.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:幼狐 帖子:130 积分:1255 威望:0 精华:0 注册:2017/4/14 21:52:00
回复:(有点甜)Dim bm As String = "查询表"Dim jb ...  发帖心情 Post By:2017/7/17 15:50:00 [显示全部帖子]

老师,麻烦您在帮我看看,我执行sql查询数据时能预览,但是生成不了表,提示下图,是什么原因导致的?
图片点击可在新窗口打开查看此主题相关图片如下:360截图20170717154917704.jpg
图片点击可在新窗口打开查看
提示
图片点击可在新窗口打开查看此主题相关图片如下:360截图20170717155111130.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2017/7/17 15:51:32编辑过]

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


加好友 发短信
等级:幼狐 帖子:130 积分:1255 威望:0 精华:0 注册:2017/4/14 21:52:00
回复:(有点甜)根据你给的例子,代码这样写 ...  发帖心情 Post By:2017/7/17 16:11:00 [显示全部帖子]

谢谢您老师,我通过这样的代码,得到了我想要的结果排除了客户所订购产品的重复值,得到了最后购买时间,O(∩_∩)O谢谢,学习不少东西

Dim bm As String = "查询表"
Dim jb As New SQLJoinTableBuilder(bm,"JK_客户基本信息")
jb.C '使用外部表,一定要设置数据源名称
jb.AddTable("JK_客户基本信息","金卡号","购买记录","金卡号")
jb.AddCols("{JK_客户基本信息}.金卡号",True)
jb.AddCols("专卖店","客户分类","姓名","性别","年龄","服用人数","症状","服务人员","电话","手机","产品种类",True)
jb.Filter = "产品种类"
jb.Distinct = True
jb.AddExp("最后日期","Max(购买时间)")
jb.AddCols("{JK_客户基本信息}.备注",True)
jb.Build()
MainTable = Tables(bm)


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


加好友 发短信
等级:幼狐 帖子:130 积分:1255 威望:0 精华:0 注册:2017/4/14 21:52:00
回复:(有点甜)根据你给的例子,代码这样写 ...  发帖心情 Post By:2017/7/17 16:13:00 [显示全部帖子]

我在学学你给我例子做的代码,太感谢了

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


加好友 发短信
等级:幼狐 帖子:130 积分:1255 威望:0 精华:0 注册:2017/4/14 21:52:00
回复:(有点甜)根据你给的例子,代码这样写 ...  发帖心情 Post By:2017/7/18 8:43:00 [显示全部帖子]

嗯嗯,好的,谢谢老师的指导,那如果我需要知道每个客户订购的最后的时间,不区分产品,不需要数量,该怎么写代码?

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


加好友 发短信
等级:幼狐 帖子:130 积分:1255 威望:0 精华:0 注册:2017/4/14 21:52:00
回复:(有点甜)如果你需要获取购买数量,必须像8楼那...  发帖心情 Post By:2017/7/18 8:52:00 [显示全部帖子]

问题解决了,麻烦了老师

 回到顶部