- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 按用户分组加载表单不同行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=139852)
-- 发布时间：2019/8/23 10:23:00
-- 按用户分组加载表单不同行
老师好！我在项目 LoadUserSetting 里输入以下代码：
If User.Group = "公司领导" Then
DataTables("计划单").LoadFilter = ""
ElseIf User.Group = "生产部" Then
DataTables("计划单").LoadFilter = ""
ElseIf User.Group = "企管部" Then
DataTables("计划单").LoadFilter = ""
ElseIf User.Group = "采购部" Then
DataTables("计划单").LoadFilter = ""
ElseIf User.Group = "市场部" Then
DataTables("计划单").LoadFilter = ""
ElseIf User.Group = "财务部" Then
DataTables("计划单").LoadFilter = ""
Else
DataTables("计划单").LoadFilter = "申请单位 = \'" & User.Group & "\'"
End If
DataTables("计划单").Load()
希望实现不同用户权限的加载分配，但出现错误提示，请问代码如何调整，谢谢老师！
此主题相关图片如下：123.png
-- 发布时间：2019/8/23 10:35:00
--
应该不是这里的问题
BeforeLoadOuterTable事件有没有代码？
-- 发布时间：2019/8/23 10:54:00
--
在BeforeLoadOuterTable里有一个代码：
If e.DataTableName = "物料分类代码" Then
e.SelectString = "Select * Fro m {物料分类代码} Where [_Identify] Is Null"
End If
我刚才把这个"物料分类代码"屏蔽了，错误提示还是出现；
我把一楼计划单的代码屏蔽后，不出现错误提示
-- 发布时间：2019/8/23 11:29:00
--
老师好！
在BeforeLoadOuterTable里有一个代码：
If e.DataTableName = "物料分类代码" Then
e.SelectString = "Select * Fro m {物料分类代码} Where [_Identify] Is Null"
End If
我刚才把这个"物料分类代码"屏蔽了，错误提示还是出现；
我把一楼计划单的代码屏蔽后，不出现错误提示；请问分组权限加载这个代码可以修改优化吗
If User.Group = "公司领导" Then
DataTables("计划单").LoadFilter = ""
ElseIf User.Group = "生产部" Then
DataTables("计划单").LoadFilter = ""
ElseIf User.Group = "企管部" Then
DataTables("计划单").LoadFilter = ""
ElseIf User.Group = "采购部" Then
DataTables("计划单").LoadFilter = ""
ElseIf User.Group = "市场部" Then
DataTables("计划单").LoadFilter = ""
ElseIf User.Group = "财务部" Then
DataTables("计划单").LoadFilter = ""
Else
DataTables("计划单").LoadFilter = "申请单位 = \'" & User.Group & "\'"
End If
DataTables("计划单").Load()
-- 发布时间：2019/8/23 11:39:00
--
其它地方有没有和"计划单"有关的关联加载代码？
-- 发布时间：2019/8/24 0:48:00
--
老师好！
1、我将“计划单”表改为别的未建立任何关联的表，测试还是出现这个错误提示，只是表名变为了新改的表。（虽然提示错误但加载是按要求执行的运行正常）；
2、我做了个模拟项目，将计划单的代码写过去，模拟项目没有提示错误，运行正常。
这个按权限加载不同行功能，是公司各部门人员可（按部门设置的组定义）对“计划单”（公司下属的各车间提交）进行审核批准，各车间只加载自己的行，部门加载全部行（计划单内用申请单位列判断）。请问老师还有什么办法解决这个错误提示？
[此贴子已经被作者于2019/8/24 8:49:04编辑过]
-- 发布时间：2019/8/24 8:40:00
--
我测试没有问题。上传实例看看
-- 发布时间：2019/8/24 9:00:00
--
请老师指导！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:foxkf.foxdb |
-- 发布时间：2019/8/24 9:12:00
--
连接不到数据库无法测试。导出一个access数据库上传测试
-- 发布时间：2019/8/24 9:42:00
--
老师好！ 是用高速导出吗，出来只一个表里可以选列，是这样吗
上传提示错误：文件类型不正确
[此贴子已经被作者于2019/8/24 9:45:28编辑过]