求助 如何给登陆用户设置权限!
如何给登陆用户设置权限!
比如系统管理员可以看到所有的操作
一般用户只能看到部分操作
谢谢
如何给登陆用户设置权限!
比如系统管理员可以看到所有的操作
一般用户只能看到部分操作
谢谢
2007-02-05 15:58
我写的代码不关什么权限都一样
If Trim(Adodc1.Recordset.Fields("权限")) = "A" Then
main.menu11.Enabled = False
2007-02-05 16:06
所谓权限只是设置程序功能局部可用还全部可用
我举个简单的例子
一个程序有两个按钮
超级用户可以使用这两个按钮的功能
普通用户只能使用一个
我用假代码写个程序
那么有以下程序
if 权限="超级用户" then
commmand1.enabled=true
commmand2.enabled=true
else
commmand2.enabled=false
end if

2007-02-05 18:46
2007-02-06 09:17
2007-02-06 10:39
哦,我没有写else后面的,难怪我不所有的权限都一样,一个是false
不管哪个级别的都是false
谢谢两位了!
以后多多指教
2007-02-06 16:46
2007-02-08 12:12