使用脚本调用系统的关机对话框实现代码
程序员文章站
2022-07-04 20:29:48
以前有介绍如何使用命令行调用系统的关机对话框: 具体方法:开始/运行: 复制代码 代码如下: rundll32.exe shell32.dll #60 但是,上述方法会存...
以前有介绍如何使用命令行调用系统的关机对话框:
具体方法:开始/运行:
rundll32.exe shell32.dll #60
但是,上述方法会存在一问题,xp下无法正常使用该方法进行关机(感谢网友沐烨 发现该问题)。问题原因可能是:正常情况下,关机对话框是有explorer.exe调用,直接使用rundll32调用时无法触发相关命令。
既然使用explorer.exe调用可以,我们可以尝试使用脚本来实现。实现原理:
激活explorer.exe
按alt+f4
编写vbs脚本如下(将下述内容另存为shutdown.vbs):
dim objwmi,wsh
dim colprocesses,objprocess
pid=0
set objwmi = getobject( "winmgmts:{impersonationlevel=impersonate}//. /root/cimv2" )
set colprocesses = objwmi.execquery( "select * from win32_process" & _
" where name='explorer.exe'" )
for each objprocess in colprocesses
pid = objprocess.processid
next
set wsh = wscript.createobject("wscript.shell")
wsh.appactivate pid
wsh.sendkeys "%{f4}"
上述脚本运行环境为:xp sp2
其他环境也可能正常工作,不过对于有多个explorer.exe进程的系统,就可能不正常工作了,如开了远程终端服务的多用户环境下。
具体方法:开始/运行:
复制代码 代码如下:
rundll32.exe shell32.dll #60
但是,上述方法会存在一问题,xp下无法正常使用该方法进行关机(感谢网友沐烨 发现该问题)。问题原因可能是:正常情况下,关机对话框是有explorer.exe调用,直接使用rundll32调用时无法触发相关命令。
既然使用explorer.exe调用可以,我们可以尝试使用脚本来实现。实现原理:
激活explorer.exe
按alt+f4
编写vbs脚本如下(将下述内容另存为shutdown.vbs):
复制代码 代码如下:
dim objwmi,wsh
dim colprocesses,objprocess
pid=0
set objwmi = getobject( "winmgmts:{impersonationlevel=impersonate}//. /root/cimv2" )
set colprocesses = objwmi.execquery( "select * from win32_process" & _
" where name='explorer.exe'" )
for each objprocess in colprocesses
pid = objprocess.processid
next
set wsh = wscript.createobject("wscript.shell")
wsh.appactivate pid
wsh.sendkeys "%{f4}"
上述脚本运行环境为:xp sp2
其他环境也可能正常工作,不过对于有多个explorer.exe进程的系统,就可能不正常工作了,如开了远程终端服务的多用户环境下。