Серый форум — VBS: Закрыть полностью окно после Telnet

Re: VBS: Закрыть полностью окно после Telnet

2016-12-18T20:19:17Z

paspdkmok пишет:

... по перезагрузке модема. ...

А какая у Вас модель модема и поддерживает ли он вэб интерфейс? Если да, то, как правило, можно перезагрузить парой XHR.

Re: VBS: Закрыть полностью окно после Telnet

2016-12-16T16:27:50Z

Насколько я понимаю, он ей и не нужен.

А вот точки в конце предложений у нас ставить принято. Извольте исправиться.

Re: VBS: Закрыть полностью окно после Telnet

2016-12-16T09:11:48Z

Flasher пишет:

Возможно, Plink больше подойдёт.

У Plink нет ключа -sendcmd.

Re: VBS: Закрыть полностью окно после Telnet

2016-12-09T18:03:04Z

paspdkmok
Можно в конец добавить:

taskkill /f /im kitty_portable.exe /t

Возможно, Plink больше подойдёт.

Re: VBS: Закрыть полностью окно после Telnet

2016-12-09T10:48:39Z

Исправил свёрнутый режим не \hid а /hid. После перезагрузки окно китти не закрывается, где бы взять faq.

c:\cmdow.exe @ /hid

Re: VBS: Закрыть полностью окно после Telnet

2016-12-09T08:27:59Z

Может это из-за pause?

Re: VBS: Закрыть полностью окно после Telnet

2016-12-07T22:23:50Z

*Исправлено*.

DnsIs использовал ваш набор, файлы лежат сразу на C, [окно телнета не было свёрнуто], после перезагрузки не закрылось. Возможно ещё есть в самом китти настройки?

c:\cmdow.exe @ /hid
start kitty_portable.exe -telnet 192.168.1.1 -log log.txt
ping 127.0.0.1 -n 3
kitty_portable.exe -sendcmd "admin\n"  -log log.txt
kitty_portable.exe -sendcmd "password\n"  -log log.txt
kitty_portable.exe -sendcmd "quit\n"  -log log.txt
kitty_portable.exe -sendcmd "exit\n"  -log log.txt
pause

Re: VBS: Закрыть полностью окно после Telnet

2016-11-25T08:46:00Z

Домашний роутер вот так перезапускаю:

c:\programs\cmd\cmdow.exe @ \hid
start kitty_portable.exe -telnet 192.168.1.1 -log log.txt
ping 127.0.0.1 -n 3
kitty_portable.exe -sendcmd "admin\n"  -log log.txt
kitty_portable.exe -sendcmd "password\n"  -log log.txt
kitty_portable.exe -sendcmd "reboot\n"  -log log.txt
kitty_portable.exe -sendcmd "exit\n"  -log log.txt

В первой строке используется cmdow при таких параметрах запуска, как раз прячет окно. А вот утилита kitty надежней работает с telnet по сравнению со связкой vbs+telnet.

Re: VBS: Закрыть полностью окно после Telnet

2016-11-19T20:06:48Z

Flasher
Cmd может быть любой, просто его запуск(вопрос с окнами только), для примера возьмём затычку:


@echo off
ping google.com

2. После команды restart vbs скрипт зависает на время и всё, просто ничего не происходит. После этого времени - около 5 секунд, работают команды Quit Exit. Для первого скрипта vbs после его выполнения остаётся cmd окно. Для второго vbs скрипта, остаётся telnet окно и просто горит нажмите любую клавишу.

Re: VBS: Закрыть полностью окно после Telnet

2016-11-17T19:44:58Z

paspdkmok
Мне точки за вас ставить?

У меня нет telnet для тестов (тут я могу только наобум накидать). И я не вижу в первом посте cmd-код отдельно от vbs. Он есть вообще?
2. Как выяснить, что модем перезагружен?

Re: VBS: Закрыть полностью окно после Telnet

2016-11-17T19:08:41Z

Flasher
Напишите кодом пожалуста.
3. Сейчас вручную vbs запускаю, потом запускаю cmd скрипт. Всё это вручную, нужно чтобы работало автоматом.

Re: VBS: Закрыть полностью окно после Telnet

2016-11-17T18:30:29Z

paspdkmok
1. Добавить строку с вводом exit.
2. Решается через WMI.
3. Не понял, что требуется.

Re: VBS: Закрыть полностью окно после Telnet

2016-11-17T17:40:13Z

paspdkmok
Полностью ознакомьтесь и отредактируйте заголовок.

VBS: Закрыть полностью окно после Telnet

2016-11-17T17:32:25Z

Начало и конец telnet.vbs скрипта по перезагрузке модема.

Set cloner = CreateObject("WScript.Shell")
cloner.run"cmd.exe"

.....

cloner.SendKeys"reset"
WScript.Sleep 1000
cloner.SendKeys("{Enter}")
WScript.Sleep 1000
WScript.Quit
WScript.Exit

Option explicit
Dim oShell
set oShell= Wscript.CreateObject("WScript.Shell")
oShell.Run "telnet"
WScript.Sleep 3000
oShell.Sendkeys "open 192.168.1.1~"
WScript.Sleep 3000
oShell.Sendkeys "admin~"
WScript.Sleep 3000
oShell.Sendkeys "mypassword~"
WScript.Sleep 3000
oShell.Sendkeys "system reboot~"
WScript.Sleep 3000
oShell.Sendkeys "~"
Wscript.Quit

Может случится и не фиксированое время перезагрузки модема. После его выполнения остаётся cmd окно.
1. Как закрыть польностью окно чтобы ничего не оставалось?
1.1 Также после перезагрузки нужно убить процесс rasauto.exe.
2. После перезагрузке модема, может быть случай вызова cmd rasdial, где после перезагрузки модема выполнить подключение rasdial через cmd, так чтобы переход с vbs на cmd автоматически и vbs не оставляло окон.