多进程的vbs脚本

所属分类: 脚本专栏 / vbs 阅读数: 1873
收藏 0 赞 0 分享

朋友要刷票,我帮他写了个刷票的脚本。但是脚本只能单线程的运行,太慢了,于是我用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全结束了就退出程序了。

所以我写的程序只是一个思路。

更多精彩内容其他人还在看

VBS监视网络连接与断开的代码

监视网络连接与断开,特殊情况下可能有点用,两个VBS脚本均来自微软官网
收藏 0 赞 0 分享

可以修改脚本自身运行次数的vbs(Self modifying script)

通过脚本修改脚本的内容,这里以统计脚本运行次数为例,想学习vbs的朋友可以参考下
收藏 0 赞 0 分享

VBScript之通过对比注册表查找隐藏的服务

系统服务有可能被 rootkit 隐藏,但有些时候我们仍可以从注册表中找到相关的信息。建议以管理员权限运行,否则有些服务列举不出来或出现错误的提示
收藏 0 赞 0 分享

VBScript 监控并结束指定进程的代码

有时候我们需要监控一些进程,防止一些进程的开启,发现指定进程运行就关闭它,那么就可以参考下面的代码
收藏 0 赞 0 分享

VBScript 输出中的对齐实现方法

有时候我们需要在vbs中输入的字符实现对齐效果,那么就可以参考下面的代码了
收藏 0 赞 0 分享

vbs 获取当前目录的实现代码

获取当前正执行的VBS的路径,通过Scripting.FileSystemObject组件实现
收藏 0 赞 0 分享

vbs 获取当前目录文件数量的代码(不包括子文件夹中的)

有时候我们需要获取当前目录下有多少个文件,那么就可以参考下面的代码
收藏 0 赞 0 分享

VBS获取当前目录下所有文件夹名字的代码

有时候我们需要获取当前目录下所有文件夹的名字,那么就可以参考下面的代码了
收藏 0 赞 0 分享

VBS读取注册表的两种方法

有时候我们需要用vbs来操作注册表,一般情况下有两种方法,一种是通过wshshell对象的regread,另外一种是使用WMI操作注册表,下面简单的介绍下
收藏 0 赞 0 分享

查看系统C盘剩余空间的VBS脚本

查看系统C盘剩下的空间方法有很多,在本文要为大家介绍的是通过VBS脚本是如何实现的,感兴趣的朋友不要错过
收藏 0 赞 0 分享
查看更多