使用脚本调用系统的关机对话框实现代码
发布时间：2016-12-03 23:18:59 所属栏目：Asp教程 来源：站长网
导读：以前有介绍如何使用命令行调用系统的关机对话框： 具体方法：开始／运行： 复制代码 代码如下: rundll32.exe shell32.dll #60 但是，上述方法会存在一问题，XP下无法正常使用该方法进行关机（感谢网友沐烨 发现该问题）。问题原因可能是：正常情况下，关机
|
以前有介绍如何使用命令行调用系统的关机对话框： 具体方法：开始／运行： 复制代码 代码如下: 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进程的系统，就可能不正常工作了，如开了远程终端服务的多用户环境下。 （编辑：淮北站长网） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |
