分页加载和后台筛选启用后加载树和筛选按钮不可用 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 分页加载和后台筛选启用后加载树和筛选按钮不可用

共有2109人关注过本帖树形打印复制链接主题：分页加载和后台筛选启用后加载树和筛选按钮不可用

weibu

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：644 积分：5225 威望：0 精华：0 注册：2018/5/19 22:27:00

分页加载和后台筛选启用后加载树和筛选按钮不可用 发帖心情

Post By：2018/9/15 8:42:00 [只看该作者]

采用的分页加载和后台筛选及筛选功能均为狐表自带的功能。

在普通用户状态下：分页筛选和后台筛选启用后加载树和筛选功能，点击某个分类，数据并不能实现筛选。打开的时候登陆者为自定义的普通用户。

表的Beforeload有设置加载条件：仅加载登陆者所在部门的信息。

在开发用户状态下：两个又是可用的，请问这是什么原因。切换到用户菜单也是可用的。

[此贴子已经被作者于2018/9/15 9:01:57编辑过]

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：107702 积分：547831 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2018/9/15 9:02:00 [只看该作者]

我测试没有问题。怎么做的分页筛选和后台筛选？贴出代码。或者上传实例说明

weibu

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：644 积分：5225 威望：0 精华：0 注册：2018/5/19 22:27:00

Post By：2018/9/15 9:24:00 [只看该作者]

蓝老师，分页筛选就是用咱们狐表自带的加载树设置的。

后台筛选就是狐表配置栏右上角的自带按钮功能。

我刚才又试了下把表时间Beforeload的加载条件去掉，登陆普通用户也是可以用的。

在论坛中看到一个跟我情况类似的

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&replyID=813816&ID=120735&skin=1

我的Beforeload事件如下：

Dim dr As DataRow = DataTables("用户信息").find("用户名 = '" & 用户名 & "'") '找到当前登录者所在的行

Dim filter As String = "1=2"

If dr("职位") = "管理者" Then

Dim drs = DataTables("部门信息").Select("层级 like '" & dr("层级") & "%'")

For Each cdr As DataRow In drs

Filter &= " or 当前所在部门 = '" & cdr("所属部门") & "' And 是否可用 = 1"

Else If dr("职位") = "职员" Then

Filter = "当前所在部门 = '" & dr("所属部门") & "'And 是否可用 = 1"

End If

DataTables("溯源码").loadfilter = Filter

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：107702 积分：547831 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2018/9/15 9:37:00 [只看该作者]

那就是合成的条件不准确。

自己看看最终合成的条件

msgbox(Filter)

weibu

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：644 积分：5225 威望：0 精华：0 注册：2018/5/19 22:27:00

Post By：2018/9/15 10:31:00 [只看该作者]

合成条件什么意思？在哪里加msgbox(Filter)

下面是beforeload的Filter

此主题相关图片如下：qq截图20180915104332.png

[此贴子已经被作者于2018/9/15 10:41:37编辑过]

有点蓝

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：107702 积分：547831 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2018/9/15 10:45:00 [只看该作者]

有没有符合上面条件的数据？

weibu

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：644 积分：5225 威望：0 精华：0 注册：2018/5/19 22:27:00

Post By：2018/9/15 10:54:00 [只看该作者]

以下内容情况是普通用户登陆，非开发用户：

加载处理的数据全部都符合上面的条件。

后台筛选按钮开启的情况下：点击筛选无筛选效果：如我想筛选商品名称为“苹果”的商品。我在单元格右击快捷筛选，并没有筛选出来苹果的商品。好像仅仅时重新加载了一下，加载的代码仅执行了Beforeload，并没有执行快捷菜单的筛选动作。

后台筛选按钮关闭的情况下：筛选是正常的；

但是通过狐表自带的加载树，设置的加载树点击相应商品是没有筛选效果的，好像还是重新加载仅执行了beforeload，并没有执行筛选树的筛选加载动作。

在开发者登陆的环境下所有功能是正常的

[此贴子已经被作者于2018/9/15 10:58:32编辑过]

weibu

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：644 积分：5225 威望：0 精华：0 注册：2018/5/19 22:27:00

Post By：2018/9/15 11:01:00 [只看该作者]

论坛中看到一个跟我情况类似的，但没看到解决方案

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&replyID=813816&ID=120735&skin=1

在普通用户登录下，如果删除表beforeload中的代码，除了达不到我按beforeload设置的加载数据的目的。加载树和后台筛选功能都正常了。

也就是说表中beforeload设置的加载条件和加载树、后台筛选不能共存。否则异常。

[此贴子已经被作者于2018/9/15 11:11:17编辑过]

有点蓝

小大 9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：107702 积分：547831 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2018/9/15 11:07:00 [只看该作者]

DataTables("溯源码").loadfilter = Filter

改为：

If e.DataTable.LoadFilter > "" Then

e.DataTable.LoadFilter = e.DataTable.LoadFilter & " and " & Filter

Else

e.DataTable.LoadFilter = Filter

End If

weibu

小大 10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：644 积分：5225 威望：0 精华：0 注册：2018/5/19 22:27:00

Post By：2018/9/15 11:18:00 [只看该作者]

还是不行，跟原来情况一样。

论坛中看到一个跟我情况类似的，但没看到解决方案

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&replyID=813816&ID=120735&skin=1

在普通用户登录下，如果删除表beforeload中的代码，除了达不到我按beforeload设置的加载数据的目的。加载树和后台筛选功能都正常了。

也就是说表中beforeload设置的加载条件和加载树、后台筛选不能共存。否则异常。

下一主题 >> << 上一主题

总数 16 1 2 下一页

主题：分页加载和后台筛选启用后加载树和筛选按钮不可用