刷人气代码

【网络作者：佚名更新时间：2008-02-27 | 字体：大中小】

[导读]Set Wshell=WScript.CreateObject( WScript.Shell )Set ie=WScript.CreateObject( InternetExplorer.Application )ie.visible=TrueFor i=1 To 99999999ie.navigate 你的空间地址 DoLoop Until ie.ReadyState=4Next 以...

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窗口浏览网页，不影响电脑的使用。

转载请注明来源：IT学习网网址：http://www.t086.com/ 向您的朋友推荐此文章
特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转载的文章有版权问题请联系我们，我们会尽快予以更正。