请求大师指点,我用VB照教材做了个系统,可登录后管理员权限只是普通用户,我设了三种权限,怎么改可以实现不同的三种权限,我的的代码如下(我是初学者,肯求望解析): 本帖最后由 bcrun 于 2011-05-16 15:09:08 编辑 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 犹豫了一下还是告诉你吧,Users 表查一次就可以了,不要查2次如果将来想学编程,先从调试开始吧 UserManage(1)是什么意思啊?Users 表查那里查了两次。我就是不懂啊,所以才全列了,条了N次,管理员的权限那项还是那样,只显示一个管理权限,换了用户名,本是高级用户的,结果权限还是普通的用户权限。你们就费心的给我看下呗 ,我感激不尽~~~ Users 表查那里是表示查两次啊?Select Case UserManage(1) Case "Administration" sbrStatus.Panels(4).Text = "状态: " & "高级管理员" Case "ReadOnly" sbrStatus.Panels(4).Text = "状态: " & "只读管理员" Case Else sbrStatus.Panels(4).Text = "状态: " & "普通管理员" End Select中UserManage(1)表示什么?请你们费心下 给我挑下那里错 ,我要求是运行是能够不同用户登录得到不同权限 factorysetup打包空文件夹问题 如何根据<进程名>获得<进程主窗口句柄>并进行处理? 拜托帮忙看一看 vb调用matlab com组件问题 急在线等 数据库中数据读取 简单问题,最后散10分 关于外接程序获取VB内部选择文本的问题!!!???? 托盘图标问题 ~~~~~~~~~~~~~~~高分呼救,关于制作安装程序后在其他机子上安装时出现的问题!!! 如何屏蔽掉控件中的mousemove事件 急!! vb 能拦截加密软件的跟踪吗? 向caozhy散个分
你们就费心的给我看下呗 ,我感激不尽~~~
Case "Administration"
sbrStatus.Panels(4).Text = "状态: " & "高级管理员"
Case "ReadOnly"
sbrStatus.Panels(4).Text = "状态: " & "只读管理员"
Case Else
sbrStatus.Panels(4).Text = "状态: " & "普通管理员"
End Select
中UserManage(1)表示什么?
请你们费心下 给我挑下那里错 ,我要求是运行是能够不同用户登录得到不同权限