Foxtable(狐表)用户栏目专家坐堂 → 如何按另一表的字段加载?


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

主题:如何按另一表的字段加载?

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110590 积分:562846 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/28 11:22:00 [显示全部帖子]

Dim Filter As String = "[经办人] = '" & User.Name & "'"
Dim f2 As String = "1=2 "
Dim dr As DataRow = DataTables("用户表").Find("[用户名]  = '" & dr1("经办人") & "' and 阅读权限 is not null")
If dr IsNot Nothing Then
    For Each s As String In dr("阅读权限").split(",")
        f2 = " or ','+ 阅读权限+',' like '%," & s & ",%'"
    Next
End If
Filter = Filter & "(" & f2 & ")"
msgbox(Filter)
DataTables("图书表").LoadFilter = Filter
DataTables("图书表").Load()

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110590 积分:562846 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/28 12:06:00 [显示全部帖子]

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=150626

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110590 积分:562846 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/28 13:39:00 [显示全部帖子]

f2 = " or ','+ 阅读权限+',' like '%," & s & ",%'"
改为
f2 = f2 & " or ','+ 阅读权限+',' like '%," & s & ",%'"

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110590 积分:562846 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/28 14:00:00 [显示全部帖子]

Filter = Filter & "(" & f2 & ")"
改为
Filter = Filter & " and (" & f2 & ")"

 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110590 积分:562846 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/28 15:18:00 [显示全部帖子]

http://www.foxtable.com/webhelp/topics/0102.htm

可以用 And 或者 Or 串联条件表达式。

用 And 串联的条件表达式必须同时满足,例如:

[省籍] = '湖南' And [学历] = '博士'

表示省籍为湖南,且学历为博士。

用 Or 串联的条件表达式只需满足一个即可,例如:

[省籍] = '湖南' Or [省籍] = '广东

表示省籍为湖南或者广东。

计算表达式值的时候,And 优先于 Or,可以使用括号组合表达式来强制改变优先级,例如:

([省籍] = '湖南' Or [省籍] = '广东') And [学历] = '博士'


 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110590 积分:562846 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/28 15:42:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:加载问题 - 1 - 副本 (1).zip


 回到顶部