NOVINKA - Online rekvalifikační kurz Java programátor. Oblíbená a studenty ověřená rekvalifikace - nyní i online.
NOVINKA – Víkendový online kurz Software tester, který tě posune dál. Zjisti, jak na to!
Avatar
vratislav tobola:28.3.2017 16:52

Zdravím.

Pro vzdálený restart routeru přes telnet používám tyto příkazy:

Option explicit
Dim oShell
set oShell= Wscript.Create­Object("WScrip­t.Shell")
oShell.Run "telnet"
WScript.Sleep 3000
oShell.Sendkeys "open 192.168.1.103~"
WScript.Sleep 3000
oShell.Sendkeys "admin~"
WScript.Sleep 3000
oShell.Sendkeys "ostrava~"
WScript.Sleep 3000
oShell.Sendkeys "reboot~"
WScript.Sleep 3000
oShell.Sendkeys "~"
Wscript.Quit

Zajímalo by mě, jak se dá docílit, aby tyto příkazy fungovaly i v nějaké aplikaci typu exe, kterou jsem si vytvořil.
Bohužel vždy to zahlásí toto...
http://jpeg.cz/…28/kjRIZ.png

Je to dělané hlavně pro majitele, který by si tímto prográmkem mohl restartovat potřebný router v případě problémů.
http://jpeg.cz/…28/9RpoA.png

Původně jsem to chtěl udělat přes klasický msgbox, ale tam to dělalo to samé. Díky za každou radu.

 
Odpovědět
28.3.2017 16:52
Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 1 zpráv z 1.