|
有很多网管同行需要,有的时候背景桌面或者净网先锋等监管软件在超级用户下运行不方便。所以就写了一个方便大家。给大家做些解释。红色的代表非超级用户下执行的文件(与此VBS放同级目录)。蓝色的代表延时,1000=1秒。绿色的代表检测注册表路径。可以修改成检测锐起或者网众等其它无盘的。紫色的代表检测键值。这样就可以保证母盘是纯净的。以下代码存为.vbs运行即可!
- On Error Resume Next
- Dim OperationRegistry,Value
- Set OperationRegistry = CreateObject("Wscript.Shell")
- Value = OperationRegistry.RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\iCafe8\admin")
- If (Value = 1) Then
- Msgbox "当前为超级用户模式,不做任何动作直接退出。",4160,"www.lansedongli.com"
- Else
- Dim Wsh
- Set Wsh = WScript.CreateObject("WScript.Shell")
- Wsh.Run "EnableAudio.exe",0,True
- WScript.Sleep(4000)
- Wsh.Run "jwxf.exe",0,True
- Set Wsh=NoThing
- WScript.quit
- End If
- Wscript.Quit
复制代码 |
3389, 打印机, 诺德尔, 网吧, 网吧版, 网吧系统, ndeer, 极速版, 诺德尔, 极速版, 诺德尔, QQ空间, QQ签名, QQ空间, QQ签名, 绿茶, QQ签名, 服务器, 论坛, 3389, 免费, 3389, 打印机, 主机, QQ空间, QQ签名, 矮哨兵, 网吧, ta
|