|
#1
|
|||
|
|||
Script Alternativo Mediante Reconexion Con Herramientas Externas
Hola os expongo el script Creado apartir de terceros es decir con herramienta externa a JD2.
El Script esta basado en VBScript (.vbs). Lo que hace el script es conectar mediante Telnet hacia el router y reiniciarlo. Yo lo eh probado en Router de Telefonica Home Station BHS RTA Bueno vamos mano a la obra. El Script donde pone "xxx" poner vuestra contraseña si lo teneis cambiada si no es así poner "1234" que es la de por defecto. El resto de cosas no varia ya que la puerta de enlace es la misma ha no ser que tengas 2 router y la tengas cambiada pero siempre el principal se suele poner en la "1". Y la segunda opción es el nombre de usuario que es "1234" strComputer="192.168.1.1" strUsername="1234" strPassword="xxx" Code:
Dim objShell Dim objNetwork Set objNetwork=CreateObject("WScript.Network") strTitle="Telnet Demo" strDefaultServer="Server01" strDefaultUser=objNetwork.UserDomain & "\" & objNetwork.UserName 'strDefaultPassword="P@ssw0rd" strComputer="192.168.1.1" 'InputBox("What server or device do you want to connect to?", strTitle,strDefaultServer) If Len(strComputer)=0 Then WScript.quit strUsername="1234" 'InputBox("What credential do you want to use",strTitle,strDefaultUser) If Len (strUsername)=0 Then WScript.Quit strPassword="xxx" 'InputBox("What password do you want to use?",strTitle,strDefaultPassword) If Len (strPassword)=0 Then WScript.Quit strReboot="reboot" 'InputBox("What password do you want to use?",strTitle,strDefaultPassword) If Len (strPassword)=0 Then WScript.Quit strExit="exit" 'InputBox("What password do you want to use?",strTitle,strDefaultPassword) If Len (strPassword)=0 Then WScript.Quit strY="y" 'InputBox("What password do you want to use?",strTitle,strDefaultPassword) If Len (strPassword)=0 Then WScript.Quit Set objShell=CreateObject("wscript.shell") 'Start Telnet objShell.Run "Telnet " & strComputer 'Give app a chance to get started WScript.Sleep 5000 objShell.AppActivate "Telnet " & strComputer 'Send login credentials objShell.SendKeys strUsername & "~" WScript.Sleep 5000 objShell.SendKeys strPassword & "~" WScript.Sleep 5000 objShell.SendKeys strReboot & "~" WScript.Sleep 5000 objShell.SendKeys strExit & "~" WScript.Sleep 5000 objShell.SendKeys stry & "~" WScript.Sleep 5000 Una vez echo eso abrir el JD2 y ir a Reconectar y Selecionais Reconexion Con Herramientas Externas Debajo pone Comando dais a Selecionar y buscais la ruta donde tengais el script y abajo del todo clikear Usar Ejecutable alternativo a Windows. Una vez todo eso echo si quereis darle a Prueba y el solo lo reiniciarael router. PD: Para los mas vagos de copiar lo subo solo hay que editarlo y guardarlo como .vbs Saludos y Contarme si funciona ! ! Last edited by LoSKi; 04.11.2016 at 21:19. |
#2
|
|||
|
|||
LoSKi ojalá le haya funcionado a alguien este script, a mí no. No sé si haya hecho algo mal, copié y pegué en bloc de notas y lo edité yo porque no pude bajar el archivo adjunto, quizás por no tener suficientes privilegios para hacerlo. Le cambié el nombre de usuario porque el mío es "admin" y la contraseña es "1234". Hice una prueba y el JD2 me lanzó esta respuesta:
Windows Script Host Secuencia de comandos: C:\Users\Santiago\Videos\Reboots.vbs Línea: 31 Carácter: 1 Error: El sistema no puede encontrar el archivo especificado. Código: 80070002 Origen: (null) |
#3
|
|||
|
|||
Buenas ese error es debido a que no tienes activado el Telnet en tu ordenador Os explico cómo tenéis que activarlo.
Primero vais desinstalar o cambiar un programa (agregar o quitar programas de toda la vida) Segundo una vez que se abra buscáis Programas y Características Tercero se abra abierto otra ventana y entráis donde pone Activar o Desactivar Características de Windows. Cuarto Esperáis que termine de cargar la página una vez cargado buscáis Telnet, vendrá desactivado pues cliquear para activarlo pulsáis aceptar y ya tendréis Telnet activo en Windows. Ahora debería de funcionar el script sin problemas. |
#4
|
|||
|
|||
Quote:
Te comento, cuando abro el vbs solo funciona correctamente y hace el reboot, pero cuando lo quiero ejecutar con el jd tira ese error |
#5
|
|||
|
|||
intenta abrir el jdownloader como administrador, y el script ponle como administrador. Primero el jd2 y pruebas.
|
Thread Tools | |
Display Modes | |
|
|