大红袍老师,还得再请教请教,老师昨天指导的几个问题我进行了学习也看了相关视频,基本能实现功能了,还有几个可视化授权的问题尚需请教
1. 我设计的系统里面,大部分表格都设置在TabControl控件内,授权表要写出窗口名和控件名才能实现打开窗口,在窗口内不可见控件;
如何实现授权表内仅写入表名,不用写窗口名和控件名,就能实现窗口内的表不可见(我参照帮助和论坛里的指导,目前所写代码还不能实现)
2. 如果授权表内分别设置了表名、列名、窗口、控件.....,怎样复合实现输入某一列的内容,就能实现指定的权限控制
例如:在表名列,输入工资,只有分组列的经理在窗口中可见工资; 在窗口列,输入财务,只有分组列的总经理在窗口可见财务
3. 根据老师昨天的指导,我测试后,根据帮助中的可视化授权,要把在LoadUserSetting中写入的代码放置到登录窗口的按钮中,好像没有必要了,
只要在所要权限控制的窗口AFTERLOAD中写入,例如:
For Each dr As DataRow In DataTables("授权表").DataRows
If dr.IsNull("窗口") = False And dr("分组名") = _UserGroup Then
Forms(dr("窗口")).Controls(dr("控件")).Visible = Not dr("不可见")
Forms(dr("窗口")).Controls(dr("控件")).Enabled = Not dr("不可编辑")
End If
Next
就可通过授权表进行控制了,不知是否能这样理解。
4. 我所做的目录树权限控制,还是没有实现,我也进行了代码的复制,还是不生效,不能控制窗口中表的不可见和可见。
写这么多,大红袍老师一定会感到学生很烦,老教不会,请老师原谅原谅,都在学习过程中,原来基础为0,现在已经有很大进步了,为了弄明白,总是在麻烦老师,老师每次指导的代码,我都在认真和努力的研究看懂,但有些还是不能完全理解明白,所以反复多次才能真正理解。再次谢谢各位老师的诚挚指导。