Foxtable(狐表)用户栏目专家坐堂 → 筛选出错


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

主题:筛选出错

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5155 威望:0 精华:0 注册:2017/10/22 10:15:00
筛选出错  发帖心情 Post By: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
图片点击可在新窗口打开查看


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/2/7 18:17:00 [只看该作者]

加入代码 msgbox(f) 看弹出什么。

 

然后,看看你beforeLoad事件写了什么代码。

 

提示的错误是:你这个表没有对应的列。


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


加好友 发短信
等级:三尾狐 帖子:689 积分:5155 威望:0 精华:0 注册:2017/10/22 10:15:00
  发帖心情 Post By:2018/2/7 18:59:00 [只看该作者]

老师,beforeLoad没写代码,用开发者登录可以正常筛选,切换到用户1也可以正常筛选,当用用户1直接登录时就出现以下的错误?

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5155 威望:0 精华:0 注册:2017/10/22 10:15:00
  发帖心情 Post By:2018/2/7 19:00:00 [只看该作者]

还有可能是哪个事件下的代码错误?

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5155 威望:0 精华:0 注册:2017/10/22 10:15:00
  发帖心情 Post By:2018/2/7 20:27:00 [只看该作者]

找到问题了

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/2/7 20:30:00 [只看该作者]

加入代码 msgbox(f) 看弹出什么。你筛选条件肯定合成错误。

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5155 威望:0 精华:0 注册:2017/10/22 10:15:00
  发帖心情 Post By:2018/2/7 21:48:00 [只看该作者]

 加msgbox(f) 没有弹出特别的窗口,还是原来的错误信息

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/2/7 22:25:00 [只看该作者]

你做什么操作、执行什么代码的时候报错?

 

msgbox(DataTables("S征情况表").LoadFilter)


 回到顶部