- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 筛选出错 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=114501)
-- 发布时间：2018/2/7 18:06:00
-- 筛选出错
我在筛选按钮设如下代码，筛选时出问题如图，但用开发者登录时，则可以正常筛选，请问老师是什么问题？
Dim Filter As String
If e.Form.Controls("RadioButton2").Checked = True \' 如果付款状态选择了"已付"
If Filter >"" Then
Filter = Filter & " And "
End If
Filter = Filter & "是否决算 = 1"
End If
If e.Form.Controls("RadioButton3").Checked = True \' 如果付款状态选择了"未付"
If Filter >"" Then
Filter = Filter & " And "
End If
Filter = Filter & "是否决算 = 0 Or 是否决算 Is Null"
End If
If Filter > "" Then
Tables("S征情况表").Filter = Filter
End If
If Filter = "" Then filter = "1=1"
Dim f As String = vars("filter")
f = iif(f > "", f & " and " & filter, filter)
Tables("S征情况表").DataTable.LoadFilter = f
Tables("S征情况表").DataTable.Load
e.Form.Controls("TextBox1").Value = 1 & "/" & DataTables("S征情况表").TotalPages
此主题相关图片如下：qq图片20180207180204.png
-- 发布时间：2018/2/7 18:17:00
--
加入代码 msgbox(f) 看弹出什么。
然后，看看你beforeLoad事件写了什么代码。
提示的错误是：你这个表没有对应的列。
-- 发布时间：2018/2/7 18:59:00
--
老师，beforeLoad没写代码，用开发者登录可以正常筛选，切换到用户1也可以正常筛选，当用用户1直接登录时就出现以下的错误？
-- 发布时间：2018/2/7 19:00:00
--
还有可能是哪个事件下的代码错误？
-- 发布时间：2018/2/7 20:27:00
--
找到问题了
-- 发布时间：2018/2/7 20:30:00
--
加入代码 msgbox(f) 看弹出什么。你筛选条件肯定合成错误。
-- 发布时间：2018/2/7 21:48:00
--
加msgbox(f) 没有弹出特别的窗口，还是原来的错误信息
-- 发布时间：2018/2/7 22:25:00
--
你做什么操作、执行什么代码的时候报错？
msgbox(DataTables("S征情况表").LoadFilter)