批处理用IE隐藏打开指定网页并不断刷新网页

330428725

用IE隐藏打开指定网页并不断刷新网页，每5分钟就修改1次IE首叶，一切都是后台执行的，批处理不行那VBS呢，VBS和批处理结合可以做到不？？其他语言做的程序也可以，不要需要下载筐架的~~，给自己的网站刷流量用的

fastslz

1. On Error Resume Next
   
2. 
   
3. Set IE = CreateObject("InternetExplorer.Application")
   
4. IE.Navigate "http://bbs.bathome.net"
   
5. IE.Visible = 1
   
6. '''''''Visible数值0隐藏，1新窗口'''''''
   
7. 
   
8. Wscript.Sleep 5000
   
9. Set O = IE.Document
   
10. Do While True
    
11.     Wscript.Sleep 20000
    
12.     O.Location.Reload(True)
    
13.     If Err <> 0 Then
    
14.         Wscript.Quit
    
15.     End If
    
16. Loop

复制代码

[ 本帖最后由 fastslz 于 2008-4-21 20:07 编辑 ]