ck80
Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Предыдущий админ уволился, не оставив пароля для Panaconic KX-TEM824. Стандартный 1234 и различные частораспространненые вариации не подходят (0000, 123456 и т.д.). Сбрасывать АТС не хочется, потому что там все настроено и работает, но для дальнейшей настройки нужно знать пароль. Наверняка существует программа или скрипт, которая перебирает пароль и вставляет его в стандартное окошко? А потом нажимают ок и потаймауту снова вводят. Пароль на АТС не сложный должен быть. Ограничения на пароль: от 4 до 6 символов, только цифры. Добавлено: Вспомнил об AutoIT Набросал скрипт, но что-то он у меня не вставляет пароль в окошко ввода ;--- AutoIt Macro Generator V 0.21 beta --- #include <File.au3> #include <Array.au3> Dim $aPasswords _FileReadToArray('c:\pass.txt', $aPasswords) For $i = 1 To 10000 Step 1 Opt("WinTitleMatchMode", 4) WinWait("Connect to PBX","Enter System Password :") ControlClick("Connect to PBX","Enter System Password :","Edit1") Send$aPasswords[$i]) ControlClick("Connect to PBX","Enter System Password :","Button6") WinWait("KX-TE Maintenance Console","The system password is wrong.") ControlClick("KX-TE Maintenance Console","The system password is wrong.","Button1") WinWait("Connect to PBX","Enter System Password :") ControlClick("Connect to PBX","Enter System Password :","Edit1") Next ;--- End --- Добавлено: Вот этот код сработал. Сидит перебирает. ;--- AutoIt Macro Generator V 0.21 beta --- #include <File.au3> #include <Array.au3> Opt("WinTitleMatchMode", 4) Dim $aPasswords _FileReadToArray("c:\1000000.txt", $aPasswords) For $i = 1 To $aPasswords[1000000] Opt("WinTitleMatchMode", 4) WinWait("Connect to PBX","Enter System Password :") ControlSend("Connect to PBX","Enter System Password :","Edit1","{BACKSPACE 7}") ControlSend("Connect to PBX","Enter System Password :","Edit1",$aPasswords[$i]) ControlClick("Connect to PBX","Enter System Password :","Button6") WinWait("KX-TE Maintenance Console","The system password is wrong.") ControlClick("KX-TE Maintenance Console","The system password is wrong.","Button1") Next ;--- End --- | Всего записей: 247 | Зарегистр. 03-07-2007 | Отправлено: 14:03 23-01-2017 | Исправлено: ck80, 13:31 24-01-2017 |
|