Foxtable(狐表)用户栏目专家坐堂 → [求助]两张sqlquery表可以设置父子连接关联表吗


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

主题:[求助]两张sqlquery表可以设置父子连接关联表吗

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


加好友 发短信
等级:幼狐 帖子:131 积分:910 威望:0 精华:0 注册:2019/5/19 21:50:00
[求助]两张sqlquery表可以设置父子连接关联表吗  发帖心情 Post By:2019/5/26 13:13:00 [只看该作者]


我想将两张表关联起来,两张表数据都是sqlquery写的
但是在窗口afterload事件里写了关联代码,代码如下:
If DataTables("采购系统_tb.1.3.1").DataRows.Count = 0                '若预警表没有数据
    DataTables("采购系统_tb.1.3.2").LoadFilter = " 商家编码 is null" '则不加载预警日志
Else
    Dim ids As String
    For Each i As DataRow In DataTables("采购系统_tb.1.3.1").DataRows
        ids = ids & "," & i("商家编码")
    Next
    ids.Trim(",")
    DataTables("采购系统_tb.1.3.2").LoadFilter = "商家编码 in (" & ids & ")"
End If
DataTables("采购系统_tb.1.3.2").Load()

但是实际提示报错,select语句附件有错误,然后关联子表就不显示了,也关联不了,请问如何关联两张表

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

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


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

 

把你的sql语句写在一起,即可的。具体问题,做一个实例发上来测试。

 

 


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


加好友 发短信
等级:幼狐 帖子:131 积分:910 威望:0 精华:0 注册:2019/5/19 21:50:00
  发帖心情 Post By:2019/5/26 16:04:00 [只看该作者]

sql语句不是各写在每张表的select语句嘛,怎么写在一起?

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


加好友 发短信
等级:幼狐 帖子:131 积分:910 威望:0 精华:0 注册:2019/5/19 21:50:00
  发帖心情 Post By:2019/5/26 16:10:00 [只看该作者]

我第一张表,父子表sqlquery的select语句为:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:codes.txt



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


加好友 发短信
等级:幼狐 帖子:131 积分:910 威望:0 精华:0 注册:2019/5/19 21:50:00
  发帖心情 Post By:2019/5/26 16:13:00 [只看该作者]

我在afterload时间的关联代码:
获取当前焦点表格商家编码
If DataTables("采购系统_tb.1.3.1").DataRows.Count = 0                '若预警表没有数据
DataTables("采购系统_tb.1.3.2").LoadFilter = " 商家编码 is null" '则不加载预警日志
Else
Dim ids As String
For Each i As DataRow In DataTables("采购系统_tb.1.3.1").DataRows
ids = ids & ",'" & i("商家编码") & "'"
Next
ids.Trim(",")
DataTables("采购系统_tb.1.3.2").LoadFilter = "商家编码 in (" & ids & ")"
End If
DataTables("采购系统_tb.1.3.2").Load()

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


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

复杂的sql语句的sqlquery窗口,不能直接使用loadfilter和load。

 

请用fill添加表格数据 http://www.foxtable.com/webhelp/scr/2912.htm

 


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


加好友 发短信
等级:幼狐 帖子:131 积分:910 威望:0 精华:0 注册:2019/5/19 21:50:00
  发帖心情 Post By:2019/5/27 11:23:00 [只看该作者]

你好,老师,我按照提示进行更改了,但是提示select附近有错误,请检查语法或者数据源设置,但我看了没问题啊,代码如下:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:codes.txt



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


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

ids.Trim(",")

 

改成

 

ids = "(" & ids.Trim(",") & ")"


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


加好友 发短信
等级:幼狐 帖子:131 积分:910 威望:0 精华:0 注册:2019/5/19 21:50:00
  发帖心情 Post By:2019/5/27 12:23:00 [只看该作者]

改了,虽然不报错了,但是两张表却没有关联:

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



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


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

实例发上来测试。

 回到顶部
总数 18 1 2 下一页