Foxtable(狐表)用户栏目专家坐堂 → 自定义用户与权限管理


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

主题:自定义用户与权限管理

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5362 威望:0 精华:0 注册:2012/8/25 20:50:00
自定义用户与权限管理  发帖心情 Post By:2018/4/1 17:29:00 [只看该作者]

初始不加载表

If _Username = "员工1"  Then

Select Case e.DataTableName
    Case "表A", "表B" '表A和表B无条件加载
    Case Else '其他所有表默认都不加载
        e.Cancel = True
End Select

End If


但是用员工1账号登录之后,所有表还是被加载。怎么在自定义用户与权限管理设定加载表条件?

[此贴子已经被作者于2018/4/1 17:28:53编辑过]

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


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

代码改成

 

Select Case e.DataTableName
    Case "表A", "表B" '表A和表B无条件加载
    Case Else '其他所有表默认都不加载
        e.Cancel = True
End Select

 

 

然后,登陆窗口的登陆按钮里面,再写代码加载你需要的表。


 回到顶部