多進程的實現(xiàn)投票的vbs腳本
更新時間：2007年02月26日 00:00:00 作者：
復(fù)制代碼 代碼如下:
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
您可能感興趣的文章:
相關(guān)文章
這篇文章主要介紹了用vbs獲取外網(wǎng)的ip地址，通過用vbs訪問ip顯示頁面的返回值實現(xiàn)，需要的朋友可以參考下2013-07-07
vbs版的sql查詢分析器，該有的功能都有了2008-08-08
UNIX時間，或稱POSIX時間是UNIX或類UNIX系統(tǒng)使用的時間表示方式：從協(xié)調(diào)世界時1970年1月1日0時0分0秒起至現(xiàn)在的總秒數(shù)，不包括閏秒。2011-01-01
VBScript語法速查及實例說明...2006-11-11
VBS實現(xiàn)將當前時間轉(zhuǎn)換成UTC時間
這篇文章主要介紹了VBS實現(xiàn)將當前時間轉(zhuǎn)換成UTC時間,十分的簡單實用，需要的朋友可以參考下2015-05-05
用VBScript收集系統(tǒng)信息并上傳到ftp空間
這個腳本的功能是運行后自動將查詢到的計算機相關(guān)信息記錄到一個文檔中，然后在經(jīng)過FTP將生成的文件上傳至服務(wù)器保存，最后在清除運行腳本是生成的文件并刪除自身。2010-12-12
VBS教程：正則表達式簡介 -早期起源...2006-11-11
用vbs從本地 Administrators 組中刪除組...2007-03-03
希望能夠找到個能給excel表另存為TXT的VBS代碼，雖然另存為可以選擇，但還是需要直接VBS執(zhí)行這一步另存為TXT格式的，應(yīng)該如何寫代碼呢2012-12-12
幾個超據(jù)學(xué)習(xí)價值的VBS腳本用法：將exe格式的flash拖放在此vbs文件上，即可生成swf文件2008-05-05