有什么办法可以远程锁定台式电脑吗？例如，如果一个人不小心让一台计算机处于登录状态，是否有办法使用远程连接 (VPN) 锁定该计算机？
问问题
49277 次
4 回答
12
使用PsExec调用：
rundll32.exe user32.dll, LockWorkStation
在您的远程 PC 上。
如果您当前在 PC_A 上并想要锁定 PC_B，请在命令行（在 PC_A 上）键入：
psexec \\\PC_B -u user -p pass "rundll32.exe user32.dll, LockWorkStation"
这种方式rundll32.exe user32.dll, LockWorkStation将在 PC_B 上调用。
于 2013-11-01T21:41:44.177 回答
4
您可以创建一个具有任意名称的文件，并且后缀为 bat 在 bat 文件中使用此代码
rundll32.exe user32.dll, LockWorkStation
保存并运行
于 2016-09-05T05:31:01.063 回答
0
您可以使用 SysInternal 工具，主要是PsShutdown工具。您将在 PC 上获得一个 cmd 实例并执行 lock 命令。
例子：
psshutdown \\computername -l
于 2013-11-01T21:40:59.957 回答
-1
Option Explicit
Dim objWMIService, objProcess
Dim strShell, objProgram, strComputer, strExe, strInput
strExe = "rundll32.exe user32.dll,LockWorkStation"
' Input Box to get name of machine to run the process
Do
strComputer = (InputBox(" ComputerName to Run Script",_
"Computer Name"))
If strComputer <> "" Then
strInput = True
End if
Loop until strInput = True
' Connect to WMI
set objWMIService = getobject("winmgmts://"_
& strComputer & "/root/cimv2")
' Obtain the Win32_Process class of object.
Set objProcess = objWMIService.Get("Win32_Process")
Set objProgram = objProcess.Methods_( _
"Create").InParameters.SpawnInstance_
objProgram.CommandLine = strExe
'Execute the program now at the command line.
Set strShell = objWMIService.ExecMethod( _
"Win32_Process", "Create", objProgram)
'WScript.echo "Created: " & strExe & " on " & strComputer
WSCript.Quit
' End of Example of a Process VBScript
于 2020-11-19T12:48:40.043 回答