Foxtable(狐表)用户栏目专家坐堂 → 网页筛选满足条件情况下执行


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

主题:网页筛选满足条件情况下执行

帅哥哟,离线,有人找我吗?
巷弄太过弯曲
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:219 积分:1800 威望:0 精华:0 注册:2019/2/16 10:17:00
网页筛选满足条件情况下执行  发帖心情 Post By:2019/6/29 9:26:00 [只看该作者]

老师,请问如图这样,怎么做到如果满足“单据编号”,“供应商”这两个条件,就过滤出对应条件数据行,如果没有对应条件的数据行,就出现提示没有该数据。我现在只能对应一条数据出现数据行,比如我选择单据编号,再去选择供应商 过滤出来的条件就是只有对供应商条件作出反应,请问代码怎么修改

图片点击可在新窗口打开查看此主题相关图片如下:企业微信截图_20190629092428.png
图片点击可在新窗口打开查看


        If e.PostValues.ContainsKey("单据编号") Then
            flt = "单据编号 = '" & e.PostValues("单据编号") & "'"
        End If
If e.PostValues.ContainsKey("供应商") Then
            flt = "供应商 = '" & e.PostValues("供应商") & "'"
End If
If e.PostValues.ContainsKey("单据状态") Then
            flt = "单据状态 = '" & e.PostValues("单据状态") & "'"
End If
If e.PostValues.ContainsKey("制单人") Then
            flt = "制单人 = '" & e.PostValues("制单人") & "'"
End If


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


加好友 发短信
等级:超级版主 帖子:107757 积分:548124 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/6/29 10:23:00 [只看该作者]

dim flt as string = "1=1"

If e.PostValues.ContainsKey("单据编号") Then
            flt = flt & " and 单据编号 = '" & e.PostValues("单据编号") & "'"
        End If
If e.PostValues.ContainsKey("供应商") Then
            flt = flt & " and 供应商 = '" & e.PostValues("供应商") & "'"
End If
If e.PostValues.ContainsKey("单据状态") Then
            flt = flt & " and 单据状态 = '" & e.PostValues("单据状态") & "'"
End If
If e.PostValues.ContainsKey("制单人") Then
            flt = flt & " and 制单人 = '" & e.PostValues("制单人") & "'"
End If

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


加好友 发短信
等级:童狐 帖子:219 积分:1800 威望:0 精华:0 注册:2019/2/16 10:17:00
  发帖心情 Post By:2019/6/29 12:39:00 [只看该作者]

谢谢老师

 回到顶部