以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  副本  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=132583)

--  作者:巷弄太过弯曲
--  发布时间:2019/3/25 14:14:00
--  副本

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

老师,帮我看一下这个情况代码该怎么修改 
如图,两个页签,“WIFI录入”绑定表为主表;“WIFI查询”绑定表设置成了副本,我在“WIFI查询”页面做了查询功能,但是当我按下查询按钮后,“WIFI查询”里的表没有变化,“WIFI录入”里的表却筛选出来了 这个是什么原因?
图片点击可在新窗口打开查看此主题相关图片如下:企业微信截图_20190325140130.png
图片点击可在新窗口打开查看

查询click:
Dim Filter As String
With e.Form.Controls("部门")
    If .Value IsNot Nothing Then
        Filter = "部门 = \'" & .Value & "\'"
    End If
End With
With e.Form.Controls("SSID号")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "SSID号 = \'" & .Value & "\'"
    End If
End With


If Filter > "" Then
    Tables("WIFI查询资料").Filter = Filter
End If

--  作者:有点甜
--  发布时间:2019/3/25 15:07:00
--  

Tables("WIFI查询资料").Filter = Filter

 

改成

 

Tables("窗口1_Table1").Filter = Filter

 

http://www.foxtable.com/webhelp/scr/1906.htm