MCGS附件2权限设置VIP免费

ɍɃɇɓ权限设置ȠȠ工作任务要求：ȠȱȮ组态三个界面：欢迎界面、测试界面和运行界面ȠȲȮ要求具有操作员以上权限（操作员或管理员）的用户才能启动系统，启动时进入欢迎界面，切换到测试界面不设权限，但只有具有管理员权限的用户才能操作“运行界面ʔ按钮，切换到运行界面。ȠȳȮ无此权限的用户进行操作，将弹出报警窗口，指示“您没有操作权限！”，触摸报警窗口中的“确认”按钮，报警窗口消失。 ȠȴȮ系统切换到测试界面或运行界面后，触摸返回按钮，返回到欢迎界面。 Ƞ 弹出窗口 点击 弹出窗口 点击 选 鼠标移到点击此处 弹出窗口 说明：添加用户：江国龙 管理员组；陈军 技术员组；钟学礼 操作员组 可以设置密码。 增加操作员、管理员用户组 弹出窗口 双击此处 双击此处，添加操作0、1、2、3 点击此处 说明：1．操作0改为用户登录，点击权限：选择为所有用户。点击脚本程序：选择!Logon() 2．操作1改为人员管理，点击权限：选择为管理员组。点击脚本程序：选择!Editusers() 3．操作2改为修改密码，点击权限：选择为管理员。点击脚本程序：选择 !ChangePassWord() 4．操作3改为退出登录，点击权限：选择为所有用户。点击脚本程序：选择!LogOff 点击用户窗口分别创建欢迎、测试、运行、历史数据等 4个窗口 注：脚本程序，IF !LogOn()=0 and !CheckUserGroup("管理员组")=0 or !CheckUserGroup("技术员")=0 THEN !SetWindow(运行,1) ELSE !OpenSubWnd( 提示,250,150,310,140,0) endif 注：脚本程序： IF !LogOn()=0 and !CheckUserGroup("管理员组")=0 THEN !SetWindow(运行,1) ELSE !OpenSubWnd( 提示,250,150,310,140,0) endif !CheckUserGroup(strUserGroup) 函数意义：检查当前登录的用户是否属于strUserGroup用户组的成员。 返 回 值：数值型。返回值=0：调用成功；<>0：调用失败。 参 数：strUserGroup，字符型，用户组的名称。 实 例：! CheckUserGroup("管理员组") !SetWindow 方法用途：对指定的用户窗口进行操作。 使用范围：只用于运行环境，组态环境中无效。 语法形式：!SetWindow( WinName as String , Mode as Long ) as Long 返 回 值：=0：调用正常，<>0：调用不正常。 参数说明：WinName ，字符型，用户窗口的名称； Mode，长整型，操作用户窗口的方法，具体含义如下： =1：打开用户窗口并使其可见； =2：打开用户窗口并使其不可见...