怎么利用vbs写的延时关闭ie进程

这篇文章给大家分享的是有关怎么利用vbs写的延时关闭ie进程的内容。小编觉得挺实用的，因此分享给大家做个参考，一起跟随小编过来看看吧。

Delay = 5000
strComputer = "."

Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set objstartup = objWMIService.Get("Win32_ProcessStartup")
Set objConfig = objStartup.SpawnInstance_
Set objProcess = GetObject("winmgmts:root\cimv2:Win32_Process")
errReturn = objProcess.Create("C:\Program Files\Internet Explorer\iexplore.exe Http://www.jb51.cn", null, objConfig, PID)
If errReturn = 0 Then
WScript.Echo "Process ID is: " & PID
End If

wscript.sleep Delay

Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process Where ProcessId = '" & PID & "'")
For Each objProcess in colProcessList
objProcess.Terminate()
Next
WScript.Echo "Close ProcessId = '" & PID & "'"

将上面保存为 1.vbs
运行方法，在cmd 里面
cscript 1.vbs

感谢各位的阅读！关于“怎么利用vbs写的延时关闭ie进程”这篇文章就分享到这里了，希望以上内容可以对大家有一定的帮助，让大家可以学到更多知识，如果觉得文章不错，可以把它分享出去让更多的人看到吧！