Pomoc Przy Napisaniu Skryptu

[Ernix]

Siemka chciałbym napisac prosty skrypt, którego funkcją bedzie rozłacznie routera i wznawianiem połaczenia internetowego:

 

1-plik [router] właczenie telnetu i włączenie skryptu

 

@ECHO OFF

rem :: Open Telnet
start telnet.EXE

rem :: Run the script
cscript//nologo SendKeys.VBS

quit
exit

 

2-plik [sendKeys] wpisanie komend

 

set handler=WScript.CreateObject("WScript.Shell")
WScript.sleep 3500 
handler.SendKeys "o 192.168.1.1~" 
WScript.sleep 6500 
handler.SendKeys "admin~" 
WScript.sleep 1500 
handler.SendKeys "admin~" 
WScript.sleep 1500 
handler.SendKeys "# reboot~" 
WScript.sleep 1500
handler.SendKeys "exit~" 
WScript.sleep 1250

 

no i teraz coś jest zwalone w tym skrypcie bo nie działa :angry:

ogólnie chciałbym komende reboot w BusyBox zastąpić disconnect i connect ale nie znam poprawnej komendy :blink:

[Ernix]

temat do zamkniecia skrypt zrobiony

 

@ECHO OFF
rem  :: :::::::::::::::::::::::::::::::::::::::::::::
rem  :: temp_SendKeys.VBS will contain the "commands"
 ECHO.set handler=WScript.CreateObject("WScript.Shell")>temp_SendKeys.VBS
 ECHO.WScript.sleep 1500 >>temp_SendKeys.VBS


rem :: :::::::::::::::::::::::::::::::::::::::::::::
rem  :: Host
 ECHO.handler.SendKeys "open 192.168.1.1~" >>temp_SendKeys.VBS
 ECHO.WScript.sleep 1500 >>temp_SendKeys.VBS


rem :: :::::::::::::::::::::::::::::::::::::::::::::
rem :: Send Login Name
 ECHO.handler.SendKeys "admin~" >>temp_SendKeys.VBS
 ECHO.WScript.sleep 1500 >>temp_SendKeys.VBS
rem :: Send Password
 ECHO.handler.SendKeys "admin~" >>temp_SendKeys.VBS
 ECHO.WScript.sleep 1500 >>temp_SendKeys.VBS

rem :: Send Command
rem  ECHO.handler.SendKeys "wan adsl reset~" >>temp_SendKeys.VBS
 ECHO.handler.SendKeys "reboot~" >>temp_SendKeys.VBS
 ECHO.WScript.sleep 1500 >>temp_SendKeys.VBS
 ECHO.handler.SendKeys " ~" >>temp_SendKeys.VBS
 ECHO.WScript.sleep 1500 >>temp_SendKeys.VBS


rem :: :::::::::::::::::::::::::::::::::::::::::::::
rem :: Logout
 ECHO.handler.SendKeys "exit~" >>temp_SendKeys.VBS
 ECHO.WScript.sleep 1250 >>temp_SendKeys.VBS
 ECHO.handler.SendKeys " " >>temp_SendKeys.VBS
 ECHO.WScript.sleep 1250 >>temp_SendKeys.VBS
 ECHO.handler.SendKeys "quit~" >>temp_SendKeys.VBS
 ECHO.WScript.sleep 1250 >>temp_SendKeys.VBS


rem :: Open Telnet
 start telnet.EXE

rem :: Run the script
 cscript//nologo temp_SendKeys.VBS

rem :: Delete temp_SendKeys.VBS
DEL temp_SendKeys.VBS

rem ::Kill Telnet
taskkill /im telnet.EXE

 exit