| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 可视化授权 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=193564) |
| -- 作者：g1j2h3 -- 发布时间：2024/9/25 18:04:00 -- 可视化授权 窗口中的表，用户名登录，按照帮助里的分组授权，没起作用，请老师指点 [此贴子已经被作者于2024/9/25 18:50:29编辑过]
|
| -- 作者：有点蓝 -- 发布时间：2024/9/26 8:48:00 -- 窗口afterload，通过窗口表对应的主表名称查询权限表里这个表的权限，重新设置一遍。查询的时候把表名也加上就可以查询指定表的权限，比如 For Each dr As DataRow In DataTables("授权表").Select("用户名 = \'" & User.Name & "\' and 表名=\'表A\'" ) Tables("窗口1_table1").Cols(dr("列名")).Visible = Not dr("不可见")
Tables("窗口1_table1").Cols(dr("列名")).AllowEdit = Not dr("不可编辑") |
| -- 作者：g1j2h3 -- 发布时间：2024/9/26 11:10:00 -- 能不能用用户名登录，而授权表和代码是按用户分组设置？ |
| -- 作者：有点蓝 -- 发布时间：2024/9/26 11:14:00 -- 帮助默认用的就是用户名啊：http://www.foxtable.com/webhelp/topics/1600.htm |
| -- 作者：g1j2h3 -- 发布时间：2024/9/26 11:17:00 -- 不好意思老师，我说的是登录系统时是用户名，而授权表和代码用的是分组 For
Each dr
As
DataRow
In
DataTables("授权表").Select("分组名 = \'" & User.Group & "\'" ) 类似这样的设置行不行
[此贴子已经被作者于2024/9/26 11:19:35编辑过]
|
| -- 作者：有点蓝 -- 发布时间：2024/9/26 11:20:00 -- 授权表里把记录的用户名改为分组名就行了 |
| -- 作者：g1j2h3 -- 发布时间：2024/9/26 11:22:00 -- 谢谢老师，我再试试 |