- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]在项目事件中有用户管理的相关代码，但是实际操作中没有起到作用，什么原因？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=69186)
-- 发布时间：2015/6/1 10:55:00
-- [求助]在项目事件中有用户管理的相关代码，但是实际操作中没有起到作用，什么原因？
项目事件
LoadUserSetting
If User.Group = "管理员" Then
DataTables("企业流水表").LoadFilter = ""
DataTables("企业客户经理表").LoadFilter = ""
Else
If User.Group = "客户经理" Then
DataTables("企业流水表").LoadFilter = "客户经理 = \'" & User.Name & "\'"
DataTables("企业客户经理表").LoadFilter = "客户经理 = \'" & User.Name & "\'"
Else
DataTables("企业流水表").LoadFilter = ""
DataTables("企业客户经理表").LoadFilter = ""
End If
End If
DataTables("企业流水表").Load()
DataTables("企业客户经理表").Load()
代码如上，但是操作中不起作用。
此主题相关图片如下：用户管理不起作用.png
-- 发布时间：2015/6/1 10:56:00
--
If User.Group = "客户经理" Then 这是判断用户组, 你用户组不匹配吧
你检查或者调试一下就知道是怎么回事了.
-- 发布时间：2015/6/1 10:56:00
--
比如我现在是客户经理“沈芳芳”登陆，应该只显示她的相关记录
-- 发布时间：2015/6/1 10:57:00
--
1、加入msgbox看是否进入了事件触发了对应代码；
2、去看一下你afteropenproject是否又重新控制了Load