Url="www.shejitime.com " '為變量Url賦值,該變量用於存儲url。
“Do”循環開始
ws . run " ie xplore . exe " & amp;Url,0 '用ie打開上面的URL。
Wscript.sleep 3000 '等待時間
' Call kill_IE(url)'調用kill_IE過程。
環
Private subkill _ ie (URL)下面的過程用於殺死上面過程中打開的所有ie瀏覽器進程。
set bag=getobject("winmgmts:\\。\root\cimv2 ")
set pipe = bag . exec query(" select * from win32 _ process where name = ' iexplore . exe ' ")
對於管道中的每個id
if instr(1,id.commandline,URL)& lt;& gt那麽0
id.terminate()
如果…就會結束
然後
末端接頭