怎么用VBS锁定计算机?

来源:百度知道 编辑:UC知道 时间:2024/06/08 00:56:29
不要调用WINKEY+L,要能达到类似多媒体网络教室里的那种锁定功能 。

Set Wshell=WScript.CreateObject(\"WScript.Shell\")
Wshell.Run \"rundll32.exe user32.dll,LockWorkStation\",1,False

或者

Set colOS = GetObject(\"winmgmts:{(Shutdown)}\").ExecQuery(\"Select * FROM Win32_OperatingSystem\")
For Each eOs In colOS
eOs.Win32Shutdown(4)。

Set Wshell=WScript.CreateObject(\"WScript.Shell\")
Wshell.Run \"rundll32.exe user32.dll,LockWorkStation\",1,False

或者

Set colOS = GetObject(\"winmgmts:{(Shutdown)}\").ExecQuery(\"Select * FROM Win32_OperatingSystem\")
For Each eOs In colOS
eOs.Win32Shutdown(4)
Next

完成了。