数据表  设计如下：
   admin_id   user    pass    qx  
    001       admin   admin    system
    002     ldy      ldy       putong
其中admin_id 为管理员编号   user 为用户名     Pass为密码   qx为权限
表名为gl
基本窗体两个  frm_login(登陆窗体）    frm_main（系统主窗体）
要实现的效果，系统登陆成功后 判断如果是普通用户权限 则不能使用   
frm_main  上的xiugai  和shanchu  按钮
应该怎么写啊，没个思路啊，翻了基本书也没找到合适的例子，最好哪位大哥能给个例子看下，我看看自己练习下就会了，先谢谢了

   admin_id   user    pass    qx  
    001       admin   admin    system
    002     ldy      ldy       putong
1、建立权限表：姑且将你在数据表中所谓的权限称之为权限组，即：001属于权限组SYSTEM，002属于权限组PUTONG，建立一张权限表，如下：
qxz       qx1    qx2    qx3    qx4    qx5    qx6……qxn
system    1      1      1       1      1       1        1
putong    0      1      0       1      0       1        0
上述表中1代表具有权限，0代表不具有权限，其中qx1,qx2  qxn 应与菜单一致
2、在菜单表单的activate 事件中根据选择用户的权限组所具有的权限对菜单项的"Enabled"属性进行设置

用户登录的时候。都从数据库查出qx 在根据用户的权限设置button的属性

好大的阵势

按钮.Enabled=False

谢谢大家，能否给份源码看一下啊，这样凭空说看得一头雾水的

[ 本帖最后由 coffecat1119 于 2011-11-15 08:44 编辑 ]

大哥你好：你这种方法应该是要同时交叉查询两个数据表的吧，交叉表查询对于我们新手来说难了点儿，大哥你能否给份简单点儿的案例源码学习一下啊，谢谢你了
另外请教下能否把权限传递给某一变量，然后随时一句话简单调用啊，就像ASP中用SESSION 或者cookies传递变量那样的

[ 本帖最后由 coffecat1119 于 2011-11-15 08:48 编辑 ]

你把用户先分成三大类，管理员，一般用户 和 特权用户。

如 QX＝0 一般用户，
   QX＝1  管理员，
   QX〉1 为 特权用户。具有某部分权限的用户，这个是用户组，但允许一个组只有一个用户。

登陆时，判断当前用户所属类别 ，如果是一般用户，那就禁用 所有的功能就是了。

登陆后，然后再读具体的权限表。
权限表里，保存只是特权用户的 权限， 管理员是直接开所有的权限，不需要用权限表。
我以前用到的权限表是：
功能，允许的用户组。
功能：字符型，指定菜单项 的编号，每个菜单项都有一个具体的编号，该编号是在写程序时指定的，可以按菜单名或缩写
允许的用户组：字符型，所有的允许的特权用户组编号 连接起来的 字符符， 用 逗号分隔，并且在最前面，最后面也要加逗号。判断时，使用 instr（1，权限，"," & 用户组编号 & "," ）>1 来判断有权限。
权限表，不需要特意去增加数据。
我的处理是：查询权限是使用一个 函数，该函数返回值是 逻辑型（真、假）
该函数根据传入的 菜单编号，和当前权限，先查 权限表，
如果权限表中无此编号，添加记录，设置允许的用户组为空。
如果权限为 0 ，也就是一般用户，直接返回 假
如果权限为 1 ，也就是管理员，返回 真
如果权限表中有此编号，判断权限，返回结果


另外还有一个 特权用户组名 及编号 对应表。
编号，用户组名
编号：流水号，范围在 2，流水号为1 的那个要强制不使用。

根据你的要求做了一个简单的实例，仅供参考，共同学习

解压后放在D盘根目录

[ 本帖最后由 apple0072011 于 2011-11-15 10:08 编辑 ]

谢谢大哥