需求:管理端的开机批处理启动较慢,需要添加到客户机的startup,要求判断是否超级来执行
On Error Resume Next
RegValue = CreateObject("Wscript.Shell").RegRead("HKEY_LOCAL_MACHINE\Software\EYOOCLIENTSTATUS\SuperLogin")
msgbox regvalue
If RegValue<>0 Then
Msgbox "超级工作站"
Else
CreateObject("Wscript.Shell").Run "cmd /k pause"
End If
Wscript.Quit
原理:根据超级和普通模式的注册表值来判断状态,如果键值不是0,就提示超级工作站,如果键值是0,就执行""中间的命令。
|