国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > VBScript > 正文

多進程的vbs腳本

2019-10-26 18:09:01
字體:
來源:轉載
供稿:網友
文章作者:千寂孤城
信息來源:邪惡八進制信息安全團隊

朋友要刷票,我幫他寫了個刷票的腳本。但是腳本只能單線程的運行,太慢了,于是我用wmi配合寫了個模擬多線程的腳本。(其實是多進程的,呵呵)
復制代碼 代碼如下:

'Created by 千寂孤城
set shell=createobject("wscript.shell")
set http=createobject("Microsoft.XMLHTTP")
'獲得“wscript.exe”進程的數量
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呼出任務管理器把wscript.exe全結束了就退出程序了。
所以我寫的程序只是一個思路。

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表

圖片精選

主站蜘蛛池模板: 高雄县| 抚顺县| 长武县| 白城市| 英吉沙县| 景谷| 呼玛县| 兴文县| 那坡县| 乐业县| 东兴市| 荔波县| 山西省| 河北区| 当雄县| 永福县| 蕉岭县| 建昌县| 清水河县| 平乡县| 静安区| 贵溪市| 台南县| 邯郸市| 天台县| 宜都市| 安塞县| 揭阳市| 石首市| 崇明县| 洪洞县| 奇台县| 剑河县| 木兰县| 辛集市| 滁州市| 澄迈县| 澄迈县| 郧西县| 宜黄县| 海门市|