Vydělávej až 160.000 Kč měsíčně! Akreditované rekvalifikační kurzy s garancí práce od 0 Kč. Více informací.
Hledáme nové posily do ITnetwork týmu. Podívej se na volné pozice a přidej se do nejagilnější firmy na trhu - Více informací.
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.