Reiniciar router Thomson da MEO por telnet com 1 click

[maar3amt]

Viva,

Para tornarem este script executável basta que salvem estas linhas de código num ficheiro com extensão .VBS tipo "reboot.vbs".
Para executar em ambiente windows basta fazer duplo click no ficheiro salvo.


PS. Para que este script funcionar terá de ter o telnet activo no seu computador.

'FICHEIRO REBOOT.VBS
'------------------------------------------------------------------
' By
' http://www.geralfoum
' -----------------------------------------------------------------------------
Set oShell = CreateObject("WScript.Shell")
oShell.run "cmd.exe"
WScript.Sleep 500
oShell.SendKeys "telnet 192.168.1.254"
oShell.SendKeys ("{Enter}")
WScript.Sleep 1000
oShell.SendKeys "Administrator"
oShell.SendKeys ("{Enter}")
WScript.Sleep 500
oShell.SendKeys "3!play"
oShell.SendKeys ("{Enter}")
WScript.Sleep 500
oShell.SendKeys "system"
oShell.SendKeys ("{Enter}")
WScript.Sleep 500
oShell.SendKeys "reboot"
oShell.SendKeys ("{Enter}")
WScript.Sleep 500
oShell.SendKeys "exit"
oShell.SendKeys ("{Enter}")
WScript.Sleep 100
oShell.SendKeys "%"

 

[hugomaxy201212]

Mt bom. vou testar
sabes so reaniciar a internet?