刷人气代码

Set Wshell=WScript.CreateObject("WScript.Shell")
Set ie=WScript.CreateObject("InternetExplorer.Application")
ie.visible=True
For i=1 To 99999999
ie.navigate "你的空间地址"
Do
Loop Until ie.ReadyState=4
Next

以上代码复制到TXT记事本,修改你的百度或其它的空间地址(注意" "要保留),保存文件名为任意文件名.vbs (后缀要是.vbs),然后运行***.vbs即可自动调用浏览器开刷。关闭浏览器即可停止运行。程序运行时可把窗口最小化,然后开启另一个IE窗口浏览网页,不影响电脑的使用。