华域联盟 vbs 使用脚本调用系统的关机对话框实现代码

使用脚本调用系统的关机对话框实现代码

以前有介绍如何使用命令行调用系统的关机对话框:

具体方法:开始/运行:


复制代码 代码如下:

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进程的系统,就可能不正常工作了,如开了远程终端服务的多用户环境下。

本文由 华域联盟 原创撰写:华域联盟 » 使用脚本调用系统的关机对话框实现代码

转载请保留出处和原文链接:https://www.cnhackhy.com/16301.htm

本文来自网络,不代表华域联盟立场,转载请注明出处。

作者: sterben

发表回复

联系我们

联系我们

2551209778

在线咨询: QQ交谈

邮箱: [email protected]

工作时间:周一至周五,9:00-17:30,节假日休息

关注微信
微信扫一扫关注我们

微信扫一扫关注我们

关注微博
返回顶部