筛选条件字符串搞不好了,请大侠帮忙会诊一下,谢谢!
这个条件是必须满足的一个条件:
county = '"& Vars("V_county") &"'
还有就是满足其中一个即可:
filter="[name] Like '%" & txt & "%' or [papernum] Like '%" & txt & "%' or [phone] Like '%" & txt & "%' or [bmunit] Like '%" & txt & "%' or [Py_Name] Like '%" & txt & "%' or [Py_Unit] Like '%" & txt & "%' "
两个组合在一起,以下代码加载不了任何数据,请帮忙看看
Dim filter As String
Dim txt As String=Vars("fTXT")
If txt = "" Then
'tbl.Filter = ""
Else
filter="[name] Like '%" & txt & "%' or [papernum] Like '%" & txt & "%' or [phone] Like '%" & txt & "%' or [bmunit] Like '%" & txt & "%' or [Py_Name] Like '%" & txt & "%' or [Py_Unit] Like '%" & txt & "%' "
filter="(" & filter & ")" & "and county = '"& Vars("V_county") &"' "
tbl.loadFilter = filter
tbl.load()
end if