>Форум Mozilla Россия http://forum.mozilla-russia.org/index.php >iMacros http://forum.mozilla-russia.org/viewforum.php?id=42 >[РЕШЕНО] смена IP c помощью iMacros+CMD+VBS http://forum.mozilla-russia.org/viewtopic.php?id=69185 |
dvitkovs > 25-01-2016 17:34:47 |
PRESIDENT пишет
Ты имеешь ввиду пример запуска внешней программы? скрытый текст но в данном примере приводится запуск экзешника (.ехе), а батник так же само запускать надо из макроса или есть способ ещё? |
InfSub > 25-01-2016 17:43:28 |
dvitkovs 25-01-2016 17:45:14 |
dvitkovs > 25-01-2016 18:10:58 |
А как сделать, чтоб исполняемый батник не исчезал сразу? А то не успеваю почитать, что он там пишет. скрытый текст так вот, он хорошо делает дисконнект, а коннект не происходит. То есть соединение с интернетом не устанавливается. Мне приходится потом вручную кликать на ярлычок на рабочем столе, тогда соединение происходит. |
InfSub > 25-01-2016 18:15:11 |
dvitkovs |
dvitkovs > 25-01-2016 18:32:41 |
InfSub пишет
Благодарю! скрытый текст Видимо это из-за неверно указанного адреса. У меня в батнике прописан адрес 192.168.255.255 но может это не верно, я пробовал разные варианты и всегда выдает сообщение об ошибке службы удаленного доступа 691. Пишет, что доступ запрещён поскольку такие имя пользователя и пароль не допустимы в этом домене. А вот какие адреса у меня на компе есть вообще: скрытый текст Подскажите, может действительно в батнике адрес нужно какой-то другой прописать? скрытый текст |
InfSub > 25-01-2016 19:50:27 |
melena083 пишет
на скрине с ipconfig все ж видно |
PRESIDENT > 25-01-2016 19:52:31 |
dvitkovs скрытый текст Выделить код Код:rasdial "имя_вашего_соединения" /disconnect timeout /T 10 /NOBREAK rasdial "имя_вашего_соединения" "Логин" "Пароль" timeout /T 10 /NOBREAK |
dvitkovs > 25-01-2016 20:42:36 |
PRESIDENT пишет
Благодарю! Так действительно само-то, что надо. Работает. |
udalov > 02-04-2016 10:36:50 |
Подскажите, команда rasdial "имя_вашего_соединения" /disconnect подходит для любого типа подключения к Интернету? Мой ноут коннектится к роутеру по wi-fi, команда rasdial, запущенная в терминале, говорит об отсутствии подключения, хотя Интернет есть. |
InfSub > 02-04-2016 13:17:48 |
udalov |
Zaplatkin > 04-04-2016 10:20:33 |
Для тех, у кого внешний динамический адрес и подключение через LAN-ADSL или через роутеры такой скрипт скрытый текст Выделить код Код:192.168.1.1 23 WAIT "Login:" SEND "LOGINm" WAIT "Password:" SEND "PASSm" WAIT ">" SEND "system restartm" SEND "user logoutm" Вместо 192.168.1.1 укажите IP вашего мoдeмa LOGIN - логин к модему PASS - пароль к модему Для тех, у кого внешний динамический адрес и прямое подключение по локальной сети предлагается такой скрипт скрытый текст Выделить код Код:C:\devcon.exe find =net timeout 5 > NUL pause C:\devcon.exe disable =net PCI\VEN_14E4 timeout 20 > NUL C:\devcon.exe enable =net PCI\VEN_14E4 timeout 5 > NUL Где PCI\VEN_14E4 идентификатор вашей сетевой карты Когда найдете идентификатор удалить пауза Запускать с правами администратора Скачать devcon.exe и распаковать в корень диска C:\ скрытый текст |
InfSub > 04-04-2016 13:03:37 |
offtop Войдите или зарегистрируйтесь, чтобы увидеть скрытый текст. |
dim222 > 08-06-2016 13:36:28 |
В cmd руками прописываю скрытый текст все чики-пуки!!! Но в bat. не знаю как реализовать. Пробовал решения опубликованные выше, ни как! В Гугле тоже не нашел. Подскажите пожалуйста кто знает как реализовать в bat. VBS. все решил. Может кому пригодиться. скрытый текст Выделить код Код:Set wshShell = WScript.CreateObject("WScript.Shell") Set oWMI = GetObject("winmgmts:\\.\root\cimv2") wshShell.Run "telnet.exe 192.168.1.1" // имя роутера WScript.Sleep 500 wshShell.SendKeys "логин~" WScript.Sleep 500 wshShell.SendKeys "пароль~" WScript.Sleep 500 wshShell.SendKeys "reboot~" WScript.Sleep 5000 Set ProcList = oWMI.ExecQuery("Select * from Win32_Process Where Name = 'telnet.exe'") For Each oProc in ProcList oProc.Terminate() Next и bat. к нему (vbs. и bat. в одной папке) скрытый текст |
Mirex > 13-07-2016 20:09:36 |
При запуске батника скрытый текст для старта .vbs скрытый текст Выделить код Код:set WshShell = WScript.CreateObject("WScript.Shell") WshShell.run "telnet.exe" WScript.Sleep 5000 WshShell.SendKeys"open 192.168.1.1" & chr(13) WScript.Sleep 5000 WshShell.SendKeys"admin" & chr(13) WScript.Sleep 5000 WshShell.SendKeys"admin" & chr(13) WScript.Sleep 5000 WshShell.SendKeys"system reboot" & chr(13) WScript.Sleep 3500 ProcessClose("cmd.exe") ProcessClose("telnet.exe") Function ProcessClose(sProcName) strComputer = "." Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process Where Name = '" & sProcName & "'") For Each objProcess in colProcessList objProcess.Terminate() Next End Function из js-скрипта скрытый текст Выделить код Код:var prgpath="C:\\ZyXel\\cmd.bat"; var args = ['-open','"c:\\program','files','(x86)\\Mozilla Firefox\\reboot.vbs"']; var file = Components.classes["@mozilla.org/file/local;1"].createInstance(Components.interfaces.nsILocalFile); file.initWithPath(prgpath); var process = Components.classes["@mozilla.org/process/util;1"].createInstance(Components.interfaces.nsIProcess); process.init(file); process.run(false, args, args.length); выдаёт ошибку скрытый текст Путь к .bat C:Zyxel\cmd.bat" Путь к .vbs C:\Program Files (x86)\Mozilla Firefox\reboot.vbs OS: Win10x64 Кто в теме, подскажите причину возникновения такой ошибки |
dim222 > 16-08-2016 18:39:43 |
Mirex |
InfSub > 16-08-2016 21:12:43 |
Путь до telnet.exe прописать нельзя было? |