用户关闭记事本.vbs时自动注销

Question

我需要在用户关闭记事本时打开记事本和注销计算机的vbs中的脚本。 我有开放的代码

Dim objShell
Set objShell = WScript.CreateObject( "WScript.Shell" )
objShell.Run("""c:\Program Files\Mozilla Firefox\firefox.exe""")
Set objShell = Nothing

和注销

Dim oShell
Set oShell = CreateObject("Shell.Application")
oShell.ShutdownWindows

但我需要比较一下。 谢谢你的帮助。

Answer 1

您可以使用单个脚本，等待记事本（或firefox）进程结束，然后关闭窗口，如下所示：

Dim objShell
Set objShell = WScript.CreateObject( "WScript.Shell" )
'run command reference : http://msdn.microsoft.com/en-us/library/d5fk67ky%28v=vs.84%29.aspx
objShell.Run """c:\Program Files\Mozilla Firefox\firefox.exe""", 1, True
Set objShell = Nothing
'logoff
Dim oShell
Set oShell = CreateObject("Shell.Application")
oShell.ShutdownWindows

注意：“oShell.ShutdownWindows”不会强制关机，只会显示关机对话框。