同じタブとウィンドウでスクリプトを実行する

Question

このスクリプトを1つのウィンドウと同じタブで何度も繰り返し実行するにはどうすればいいですか？

list = Array("example.com") 
Set ie = CreateObject("InternetExplorer.Application") 
ie.Visible = True 


For Each url In list 
    ie.Navigate url 
    While ie.ReadyState <> 4 
    Wend 
    wscript.sleep 100000 

Next 

Answer 1

Const RepeatCount = 10 

Dim i As Integer 

List = Array("example.com") 
Set ie = CreateObject("InternetExplorer.Application") 
ie.Visible = True 

For i = 1 To RepeatCount 

    For Each URL In List 
     ie.Navigate URL 
     While ie.ReadyState <> 4 
     Wend 
     wscript.sleep 100000 

    Next 

Next