国产探花免费观看_亚洲丰满少妇自慰呻吟_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全結束了就退出程序了。
所以我寫的程序只是一個思路。

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

圖片精選

主站蜘蛛池模板: 福鼎市| 靖江市| 湖州市| 大悟县| 普洱| 久治县| 玉环县| 昆明市| 和田县| 大安市| 丁青县| 淮南市| 黄骅市| 宾阳县| 龙泉市| 象山县| 乐业县| 岑巩县| 灵丘县| 邵武市| 永吉县| 克东县| 安阳县| 枝江市| 高青县| 三都| 土默特左旗| 新乐市| 灵武市| 阳春市| 岫岩| 安塞县| 宿松县| 桂林市| 新乡县| 英德市| 淮阳县| 辽源市| 嘉义县| 杭州市| 漳平市|