多進程的vbs腳本
更新時間:2006年08月29日 00:00:00 投稿:mdxy-dxy
朋友要刷票,我?guī)退麑懥藗€刷票的腳本。但是腳本只能單線程的運行,太慢了,于是我用wmi配合寫了個模擬多線程的腳本
朋友要刷票,我?guī)退麑懥藗€刷票的腳本。但是腳本只能單線程的運行,太慢了,于是我用wmi配合寫了個模擬多線程的腳本。(其實是多進程的,呵呵)
'Created by 千寂孤城 set shell=createobject("wscript.shell") set http=createobject("Microsoft.XMLHTTP") '獲得“wscript.exe”進程的數(shù)量 a=0 for each ps in getobject("winmgmts:\\.\root\cimv2:win32_process").instances_ if ps.name="wscript.exe" then a=a+1 next if a<=5 then '默認的5進程,如果不足5個就運行一個自己 shell.run "wscript.exe """&wscript.scriptfullname&"""" else '第六個不參與刷票,用來退出程序 msgbox "按確定退出程序!",,"多進程刷票機 ——By 千寂孤城" shell.run "taskkill /F /IM wscript.exe",0 wscript.quit end if ' 開始刷票 do http.open "POST","http://***/lookover.php?R1=2",false http.send loop
當然你可以不這么麻煩,直接多雙擊幾次就多進程了,Ctrl+Alt+Del呼出任務(wù)管理器把wscript.exe全結(jié)束了就退出程序了。
所以我寫的程序只是一個思路。
您可能感興趣的文章:
相關(guān)文章
vbscript 調(diào)用WebService實現(xiàn)代碼
vbscript 調(diào)用WebService實現(xiàn)代碼,需要的朋友可以參考下。2009-11-11VBS教程:函數(shù)-IsNumeric 函數(shù)
VBS教程:函數(shù)-IsNumeric 函數(shù)...2006-11-11防止網(wǎng)頁腳本病毒執(zhí)行的方法-from web
防止網(wǎng)頁腳本病毒執(zhí)行的方法-from web...2007-02-02