Question

Vb怎么设置用户权限

设计一个管理系统 有三种不同用户登录 分别是操作员 专家 和 普通用户 正确输入密码后登录 不正确提示再输 然后通过设置主程序的菜单和工具栏是否有效来实现他们是否有权限访问各模块 求代码

Answer 1

权限设置比较简单，在数据表设置一个权限字段，你可以使用字符数据即可，例如“一般”是普通用户、“专家”是专家、“管理员”是系统管理员，登录界面可以设置用户名、密码文本框，权限设置下拉框，判断用户名、密码、权限是否正确即可。
在登录后将权限存储为程序级变量，即在模块中设置程序级变量，达到主程序界面，获取权限，根据权限，设置菜单的可操作性即可。

Answer 2

一、动态生成
1、用动态生成菜单项
2、把菜单项目放入 数据库 设置一个菜单级别字段与用户级别对应，根据用户级别加载删除菜单项。
如：
用户 级别
用户1 1
用户2 3

菜单 级别
菜单1 1
菜单2 3

二、无数据库
在定义菜单名称的时候 name=name+级别 与用户级别对应。
如 菜单_1_000(超级用户菜单名称类型) 菜单_1_111(普通用户菜单)
根据用户级别，加载删除菜单名称。
这种灵活性不高。

以上两种只是针对，角色级别用户

三、针对每个用用设置不同的权限这个比较复杂。
这个你可以给每个菜单设置个特殊的 名称。在用户表字段里加入一个
类似。。。
如：

a 菜单1 菜单1.1 菜单1.2
b 菜单2 菜单2.1 菜单2.2
c 菜单3 菜单3.1 菜单3.2

在用户表中表示
用户名 根菜单权限 子菜单权限
用户1 a,b,c a1.1,a1.3 (表示用户有abc三个根菜单，及其对应的子菜单 )
用户2 a,c a1.1,a1.3,c3.1,c3.2 (表示用户有ac两个根菜单，及其对应的子菜单 )

Answer 3

权限只是不同的身份证.
数据库里加多一个身份证权限就好.

比如:
100 为操作员 全操作

200 为专家 大部分操作

300 普通用户 最低功能部分操作

能否明白.

追问

不能 -- 我基础薄弱 可以再详细点吗

Answer 4

If Text1.Text = "指定的字符串" And Text2.Text = "指定的字符串" Then ...