建立一个带密码的数据库
设置两个字段UserID和Password。
通过用户输入的UserID
使用"SELECT [Password] FROM [User] WHERE [UserID] = '" & txtUserID.Text & "'"
找到用户密码,
然后和用户输入的对比。
不符合就要求重新输入或者退出。

解决方案 »

  1.   

    rs.open "select username,userright from users"
    select case rs("userright")
    case 1:...
    case 2:...
    case 3:...
    case else:...
    end select
      

  2.   

    用户权限字段(例如URight)可以设为字符型,每一个字母表示一种权限。例如程序中有六个功能,则URight="101000",此表示此用户对第一,三项功能有读权限。当然,你可以将URight设为“102000“。表示此用户对第三项功能有写权限,对第一项仅有读权限。
      

  3.   

    To yell(飞空草):
    老兄您的回答使我想到了UNIX文件权限的管理办法。我也碰到这位兄台类似的问题。这种情况下适合一条记录只属于一个管理员,如果它可以允许多个管理员管理,是不是要加上“组”的概念?如果是,一条记录可以让多个管理员,多个组来管理,那么数据库中的"101000"该怎么写呢?
      

  4.   

    即使每个管理员使用一条记录,其所占用的空间还是非常有限的,所以我不认为有用一条记录管理多个管理员的必要。如果真的要这样做,我也想出了一个解决方法。仍假设有六项权限,Group1"101000",Group2"100010"。权限字段可设为"101000100010"。对于某一具体管理员只需了解其属于Group(i),然后从(i-1)*6+1开始取即可。