Hola, Perdonad que reavive un post antigüo pero necesito hacer exactamente lo mismo pero con la diferencia que no se abran nuevas ventanas, quiero decir tengo un listado de unos 4.000 hipervínculos y necesito visitarlos todos de alguna manera automática pero no necesito ni siquiera verlos en el explorador, simplemente que visite todos los hipervinculos.
He visto este código y me vendría genial si todos los hipervínculos se cargaran en la misma ventana del explorador por ejemplo. (no en diferentes ventanas ni en diferentes pestañas).
¿Alguien me puede echar una mano?
Mil gracias.
Cita:
Iniciado por jimylu 
mmm lo que tienes que hacer es una pequeña programacion con codigos vbs te dejo el codigo tu solo cambias la las urls que necesitas
.
Código:
Set IExp = CreateObject("InternetExplorer.Application")
Set IExp1 = CreateObject("InternetExplorer.Application")
Set IExp2 = CreateObject("InternetExplorer.Application")
Set IExp3 = CreateObject("InternetExplorer.Application")
Set IExp4 = CreateObject("InternetExplorer.Application")
Set IExp5 = CreateObject("InternetExplorer.Application")
Set IExp6 = CreateObject("InternetExplorer.Application")
Set IExp7 = CreateObject("InternetExplorer.Application")
Set IExp8 = CreateObject("InternetExplorer.Application")
Set WSHShell = WScript.CreateObject("WScript.Shell")
IExp.Width = 800
IExp.Height = 600
IExp.Left = 0
IExp.Top = 0
IExp.Visible = True
IExp2.Visible = True
IExp3.Visible = True
IExp4.Visible = True
IExp5.Visible = True
IExp6.Visible = True
IExp7.Visible = True
IExp8.Visible = True
IExp.TheaterMode = False
IExp2.TheaterMode = False
IExp3.TheaterMode = False
IExp4.TheaterMode = False
IExp5.TheaterMode = False
IExp6.TheaterMode = False
IExp7.TheaterMode = False
IExp8.TheaterMode = False
Do While (IExp.Busy)
Wscript.Sleep 200
Loop
IExp.navigate "http://www.google.com"
IExp2.navigate "http://www.terra.com.pe"
IExp3.navigate "http://www.hotmail.com"
IExp4.navigate "http://www.youtube.com"
IExp5.navigate "http://www.yahoo.com"
IExp6.navigate "http://www.jminformatics.com"
IExp7.navigate "http://www.forosdelweb.com"
IExp8.navigate "http://www.php.net"
abre un notepad copia todo el codigo que te di y lo guardas con extension vbs por ejm ventanas.vbs ojo que sea vbs y no txt
lo guardas en tu escritorio su icono es parecido a un papiro celeste lo ejecutas y listo ahora para cambiar las urls le das clic derecho sobre el archivo y le das modificar y ahi puedes cambiar lo que desees ah tambien te indico que como son 8 ventanas si tu memoria es baja se va a sobrecargar y van a demorar un poco en abrir, espero que te sirva y nos cuentas como te fue
.