View Single Post
  #3  
Old 05.04.2013, 11:55
Paclanc
Guest
 
Posts: n/a
Default

Pues vamos a ver. Primero ¿Tienes activado telnet?
Si te sale "Telnet no se reconoce como un comando valido.." entonces tienes que activarlo.

Si ya lo tienes activado, al iniciar seción te debe salir algo como esto:


Ahora, para comprobar lo que dices acerca del nombre de la interfaz ppp, (que por defecto debería ser Internet. Para saber el nombre, escribe "menu", para que aparezca el menu con todas las opciones.

Con las flechas, navega hasta donde dice ppp y presiona Enter


luego dirigete a donde dice "iflist" y presiona enter


Ahora solo te saldra una opcion llamada "[intf] =", presiona Enter y te saldra el nombre de la interfaz ppp


Debería ser Internet, pero si no es así, simplemente reeplaza en
ppp ifdetach intf=Internet y ppp ifattach intf=Internet la palabra internet por lo que sea que te aparezca.

Prueba a meter los comandos manualmente para ver si funciona.

Despues de escribir ppp ifdetach intf=Internet, no aparece ninguna confirmacion, simplemente abajo volvera a aparecer {TELMEX}=>, indicando que ya se desconecto y entonces puedes ecribir ppp ifattach intf=Internet para reconectar. Si manualmente los cambios funcionan, entonces es en el vbs donde tienes problemas. Prueba con este, lo modifique a como estaba antes para que no me de errores.

Option explicit
Dim oShell
set oShell= Wscript.CreateObject("WScript.Shell")
oShell.Run "cmd"
WScript.Sleep 300
oShell.Sendkeys "telnet 192.168.1.254~"
WScript.Sleep 100
oShell.Sendkeys "TELMEX~"
WScript.Sleep 50
oShell.Sendkeys "1B33616129~"
WScript.Sleep 100
oShell.Sendkeys "ppp ifdetach intf=Internet~"
WScript.Sleep 2500
oShell.Sendkeys "ppp ifattach intf=Internet~"
WScript.Sleep 100
oShell.Sendkeys "exit~"
WScript.Sleep 500
oShell.Sendkeys "q~"
WScript.Sleep 100
oShell.Sendkeys "exit~"
Wscript.Quit

Recuerda que:
  • El caracter "~" segun recuerdo solo es para enviar enters.
  • Los números que siguen a WScript.Sleep son tiempos, pausas que espera el script en mili segundos antes de enviar el próximo comando. Revisa esto, ya que si los tiempos son muy cortos y se envían los comandos antes de que el anterior termine de procesarse, entonces ese no se cuenta o puede causar errores. Prueba a hacerlos mas largos para ver si ese es tu problema. Recuerda que debe aparecer {TELMEX}=> indicando que ya puedes enviar otro comando.
Despues de hacer lo anterior, cuéntame si tu problema se resolvió.
Reply With Quote