Quero abrir o Chrome com um URL. Após 10 segundos, ele precisa ser redirecionado para outro URL.
Dim iURL
Dim iURL2
Dim objShell
iURL = "http://10.184.165.112/platform-gwt-war/"
iURL2 = "http://10.184.165.112/platform-gwt-war/#Plant_Equipment_Status"
set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "Chrome.exe", iURL, "", "", 1
objShell.ShellExecute "Chrome.exe", iURL2, "", "", 2
Isso está abrindo 2 guias. Enviar chaves também não está funcionando.
alguma sugestão?