主题：权限管理

您好！如果当前用户是管理员的话，只能对系统里面的表进行统计查询，不能修改编辑，这个是在哪里如何编码实现？

If user.name = "管理员" Then
    For Each t As Table In Tables
        t.AllowEdit = False
    Next
End If

您好，这个应该是在用户登录界面的确定按钮事件还是哪个事件？有些凌乱，不知道放在哪个事件中？

此主题相关图片如下：1.png

 

我放在用户登录的 确定按钮和项目属性的loadusersetting事件中，都只能约束个人信息表不被编辑，其他表还是可以编辑

打开项目以后，在命令窗口执行下面代码，弹出什么？能否控制？

 

msgbox(user.name)

If user.name = "管理员" Then msgbox(1)     For Each t As Table In Tables         t.AllowEdit = False     Next End If

1、弹出管理管理员，1.

2、可以控制

那么这段代码应该放在哪里？

 

可以用表的startEdit事件控制么，这样就要在每个表中控制，最好能够统一控制

放在登录按钮后肯定是可以的。如果之后后动态加载表，在加载后重新设置一下