Foxtable(狐表)用户栏目专家坐堂 → [求助] 表间条件筛选命令


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

主题:[求助] 表间条件筛选命令

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


加好友 发短信
等级:五尾狐 帖子:1029 积分:6497 威望:0 精华:0 注册:2014/1/3 12:49:00
[求助] 表间条件筛选命令  发帖心情 Post By:2015/8/27 17:37:00 [只看该作者]

有如下表间关联筛选公式如下:

Dim t As Table = Tables("OLT设备端口密码表")
With Tables("GPON口与分纤盒对应关系表")
    If .Current Is Nothing Then
        t.Filter = "False"
    Else
        t.Filter = "  (机房名称 = '" & .Current("机房名称") & "' and 设备名称 = '" & .Current("设备名称") & "' and 设备端口 = '" & .Current("设备端口") & "' and  是否使用 = False ) or ( 机房名称  is  null)  " 

 End If
    
End With

如果我再增加了一个筛选条件,就会出现了其中【and  是否使用 = False】条件不生效的情况;请问我的命令哪里错啦?

Dim t As Table = Tables("OLT设备端口密码表")
With Tables("GPON口与分纤盒对应关系表")
    If .Current Is Nothing Then
        t.Filter = "False"
    Else
        t.Filter = "   (机房名称 = '" & .Current("机房名称") & "' and 设备名称 = '" & .Current("设备名称") & "' and 设备端口 = '" & .Current("设备端口") & "' and  是否使用 = False ) or ( 机房名称  is  null)  or (分纤盒编号  like  '%" & .Current("分纤盒编号") & "%')   " 

 End If
    
End With

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/8/27 17:46:00 [只看该作者]

like条件始终成立,或者like条件涵盖了是否使用为false的情况。查看你的数据

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


加好友 发短信
等级:五尾狐 帖子:1029 积分:6497 威望:0 精华:0 注册:2014/1/3 12:49:00
  发帖心情 Post By:2015/8/27 17:52:00 [只看该作者]

那我该怎么改?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/8/27 18:22:00 [只看该作者]

直接说你的逻辑。

 

t.Filter = "   (机房名称 = '" & .Current("机房名称") & "' and 设备名称 = '" & .Current("设备名称") & "' and 设备端口 = '" & .Current("设备端口") & "' and  是否使用 = False ) or ( 机房名称  is  null)  or (分纤盒编号  like  '%" & .Current("分纤盒编号") & "%' and 是否使用 = False) 

[此贴子已经被作者于2015/8/27 18:22:27编辑过]

 回到顶部