Перейти к содержимому



ЗАРАБАТЫВАЙ НА
>>ПРОДАЖЕ ШАБЛОНОВ И ПРИВЛЕЧЕНИИ РЕФЕРАЛОВ<<
>>ПОИСКЕ СЛИВЩИКОВ ШАБЛОНОВ<<

Фотография

Небольшое решение от бана


  • Авторизуйтесь для ответа в теме
Сообщений в теме: 21

#1 alex_recra

alex_recra

    Продвинутый пользователь

  • Пользователи-L3
  • PipPipPip
  • 505 сообщений

Отправлено 07 Май 2018 - 17:22

Для прямого соединения проще:

Создаём BAT файл 

rasdial название вашего соединения /disconnect
ipconfig /flushdns ADSL
ipconfig /registerdns ADSL
TIMEOUT /T 15 /NOBREAK
ipconfig /setclassid ADSL
ipconfig /release ADSL
rasdial название вашего соединения логин пароль

кладём в папку с минипостером и создаем шаблон скрипт ещё проверяет соединение у
кого с первого раза не соединится

[SET_MODEL_SETTINGS][ERROR_REPEAT]
[DISPLAY][Перезагрузка соединения]
[LOG_DISPLAY][Перезагрузка соединения]
[SLEEP][4]
[RUN_FILE][restart ip.bat]
[DISPLAY][Rectart $TIME]
[SLEEP][25]

[LOG_DISPLAY][Проверяю соединение]
[GET][https://ya.ru/]
[SLEEP][5]
[LOG_DISPLAY][Есть соединение-$TIME]

можно в инклуд рекапчи:

[FIND_TEXT][ERROR_PROXY_BANNED][$r_data]
[IF][$bool]
[DISPLAY][ERROR_PROXY_BANNED]
[IF][$mutex>=1]
[MUTEX][$mutex][UNLOCK]
[ENDIF]

[INCLUDE][avtorestartIP]

[RAND][60][220]
[SLEEP][$rand]

ВНИМАНИЕ TELNET У КОГО НЕТ ПРИДЁТСЯ УСТАНАВЛИВАТЬ, ИНАЧЕ НЕ ЗАРАБОТАЕТ!!!
И РОУТЕР ДОЛЖЕН ПОДДЕРЖИВАТЬ TELNET!!!

Для роутера неудобно тем, что под каждый роутер свой скрипт и придётся в планировщик заданий создавать задачу
вот для примера скрипт(VBS) для Zyxel Keenetik может кому пригодится, только перезагрузка:

set WshShell = WScript.CreateObject("WScript.Shell") 
WshShell.run "telnet.exe" 
WScript.Sleep 9000 
WshShell.SendKeys"open 192.168.1.1" & chr(13) 
WScript.Sleep 9000
WshShell.SendKeys"system reboot" & chr(13) 
WScript.Sleep 5000 
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 

  • 1


#2 klieve

klieve

    Продвинутый пользователь

  • Заблокированные
  • PipPipPip
  • 185 сообщений

Отправлено 07 Май 2018 - 18:04

Название соединения у меня "Подключение по локальной сети". Вместо кириллицы там появляются кракозябры

 


  • 0

#3 alex_recra

alex_recra

    Продвинутый пользователь

  • Пользователи-L3
  • PipPipPip
  • 505 сообщений

Отправлено 07 Май 2018 - 18:07

Название соединения у меня "Подключение по локальной сети". Вместо кириллицы там появляются кракозябры

 

Ты роутер хочешь перезагрузить или что???


  • 0

#4 klieve

klieve

    Продвинутый пользователь

  • Заблокированные
  • PipPipPip
  • 185 сообщений

Отправлено 07 Май 2018 - 18:08

 

Название соединения у меня "Подключение по локальной сети". Вместо кириллицы там появляются кракозябры

 

Ты роутер хочешь перезагрузить или что???

 

роутер


  • 0

#5 alex_recra

alex_recra

    Продвинутый пользователь

  • Пользователи-L3
  • PipPipPip
  • 505 сообщений

Отправлено 07 Май 2018 - 18:12

 

 

Название соединения у меня "Подключение по локальной сети". Вместо кириллицы там появляются кракозябры

 

Ты роутер хочешь перезагрузить или что???

 

роутер

 

Посмотри сперва твой роутер telnet поддерживает, если поддерживает, то тебе только VBS создавать и в диспетчер задач это то что в низу скрипт читай внимательно тебе не надо ни где прописывать подключение


  • 0

#6 klieve

klieve

    Продвинутый пользователь

  • Заблокированные
  • PipPipPip
  • 185 сообщений

Отправлено 07 Май 2018 - 18:15

Скрытый текст

Telnet включен, VBS создан и работает если запускать из винды, из miniPoster скрипт VBS не запускается.


  • 0

#7 alex_recra

alex_recra

    Продвинутый пользователь

  • Пользователи-L3
  • PipPipPip
  • 505 сообщений

Отправлено 07 Май 2018 - 18:18

 

Скрытый текст

Telnet включен, VBS создан и работает если запускать из винды, из miniPoster скрипт VBS не запускается.

 

Я знаю минипостер почему-то не запускает я тоже долго мучился, задачу создавай для перезагрузки 


  • 0

#8 klieve

klieve

    Продвинутый пользователь

  • Заблокированные
  • PipPipPip
  • 185 сообщений

Отправлено 07 Май 2018 - 18:21

 

Скрытый текст

Можно поподробнее, что за задачу? 


  • 0

#9 alex_recra

alex_recra

    Продвинутый пользователь

  • Пользователи-L3
  • PipPipPip
  • 505 сообщений

Отправлено 07 Май 2018 - 18:24

Извини попутал планировщик заданий в винде в поиске пропиши увидишь


  • 0

#10 klieve

klieve

    Продвинутый пользователь

  • Заблокированные
  • PipPipPip
  • 185 сообщений

Отправлено 07 Май 2018 - 19:29

Удалось решить проблему перезапуска для ростелекомовского роутера только через браузер МП.

[VAR][$URL][http://admin:admin@192.168.1.1/resetrouter.html]

[CBROWSER_COMMAND][$MODEL_NAME][START_BROWSER][SHOW_MINIMAZE]
[CBROWSER_COMMAND][$MODEL_NAME][OPEN_URL][$URL]
[CBROWSER_COMMAND][$MODEL_NAME][WAIT_LOAD]
[CBROWSER_COMMAND][$MODEL_NAME][MOUSE_EMULATION][LBUTTON_CLICK||355:50]
[SLEEP][3]
[CBROWSER_COMMAND][$MODEL_NAME][CLOSE_WINDOW]

  • 0


Обратно в Разработка шаблонов


Количество пользователей, читающих эту тему: 0

0 пользователей, 0 гостей, 0 анонимных