最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

利用vbs寫的延時(shí)關(guān)閉ie進(jìn)程的腳本代碼

 更新時(shí)間:2010年11月28日 18:58:13   作者:  
windows 利用vbs 寫的延時(shí)關(guān)閉ie進(jìn)程的腳本,需要的朋友可以參考下。
復(fù)制代碼 代碼如下:

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
運(yùn)行方法,在cmd 里面
cscript 1.vbs
看效果

相關(guān)文章

最新評(píng)論

油尖旺区| 巩义市| 平利县| 杭锦后旗| 内丘县| 南宫市| 紫金县| 车致| 裕民县| 嘉禾县| 共和县| 鲁山县| 吐鲁番市| 仙桃市| 高碑店市| 获嘉县| 巧家县| 金湖县| 涪陵区| 皋兰县| 锦州市| 宁化县| 垦利县| 普安县| 阿坝| 农安县| 台安县| 福建省| 黄石市| 开平市| 来宾市| 炉霍县| 渭源县| 新河县| 葵青区| 鸡泽县| 柯坪县| 石河子市| 阳曲县| 镇原县| 雅江县|