Автоматизация входа на защищенный сервер в IE9

[Михаил]

Версия AutoIt: 3.3.6.1
Здравствуйте, при входе на защищенный локальный сервер через IE9 всплывает окно ввода имени пользователя и пароля. Автоматически в WINXP проблему входа на IE8 я решал очень просто :

[b]WinWaitActive("Подключение к mfd88.svrw.oao.ru", "", $wintime1) then
ControlSend("Подключение к mfd88.svrw.oao.ru", "", "Edit2", "{BACKSPACE 15}")
ControlSend("Подключение к mfd88.svrw.oao.ru", "", "Edit2", $Data[3])
ControlSend("Подключение к mfd88.svrw.oao.ru", "", "Edit3", "{BACKSPACE 15}")
ControlSend("Подключение к mfd88.svrw.oao.ru", "", "Edit3", $Data[4])
ControlClick("Подключение к mfd88.svrw.oao.ru", "", "Button2", "left")[/b]

$Data[3] - логин
$Data[4] - пароль

В WIN 7 на IE9 такой фокус не проходит. Там все также Button2, вместо edit2 - edit1, а edit3 - edit2, только
пароль вместе логином вводится в одно поле edit1 , либо все проходит успешно, но авторизация не проходит. А вот если вводить тоже самое в ручную то все впорядке. Видимо в IE9 чтото изменилось...

[B]$var1 = "\Internet Explorer\iexplore.exe http://mfd88.svrw.oao.ru/aocarm/"
Run(@ProgramFilesDir & $var1) 

$var = ControlGetText("Безопасность Windows", "", "Edit2")
msgbox(0,0,$var)
ControlSend("Безопасность Windows","","Edit1","pms")
sleep(1000)
ControlSend("Безопасность Windows","","Edit2","pkms0812")
sleep(1000)
ControlClick("Подключение к mfd88.svrw.oao.ru", "", "Button2", "left")[/b]

Подскажите пожалуйста как решить данную проблему.Очень не хочется вводить логин пароль в ручную. Может быть возможно воспользоваться альтернативным браузером ???
Примечания:

 

[Михаил]

Очень жду вашего ответа , проблема все еще актуальна, очень интересно как можно автоматически входить используя скрипт autoit в win 7 ie9.

 

[Михаил]

А может быть можно эту страничку вызвать через GUI ? При использовании данного скрипта страница не открывается, так идет запрос на ввод имени пользователя и пароля, который не может выполниться , возможно ли средствами автоит вызвать это окно?

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$Form1 = GUICreate("Form1", 633, 454, 192, 114)
$Obj1 = ObjCreate("Shell.Explorer.2")
GUICtrlCreateObj($Obj1, 0, 0, 633, 454)
GUISetState(@SW_SHOW)
$Obj1.Navigate("http://111")

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

 

[Dellroc]

Присоединяюсь к вопросу.
Нашёл авторизацию через Microsoft.XMLHTTP. Может кому-то пригодится.

$oHTTP = ObjCreate("Microsoft.XMLHTTP")


$oHTTP.Open("GET", $url, 0,$login,$pass)

Вот ещё способ:

$oHTTP = ObjCreate('WinHttp.WinHttpRequest.5.1')
$oHTTP.SetProxy(1) ; 0-настройки из IE, 1-прямой доступ, 2-через прокси
$oHTTP.Open("GET", $url)
$oHTTP.SetCredentials($login,$pass,0) ; 0-NTLM аутентификация, 1-прокси аутентификация
$oHTTP.Send("")

 

[Михаил]

Здравствуйте, проблема все еще актуальна ! Я так понимаю что тут IE не причем(тестил в 8 и 9), просто в WINDOWS 7 поменялся алгоритм работы с окнами windows security и теперь стандартными средствами Autoit, войти на сайт не представляется возможным. Пароль вводится, только бывает что вместо EDIT2 , на который я ссылаюсь, он вводит его вместе с логином в EDIT1. А также после ввода при нажатии ОК, ничего не происходит - как будето операции копи\пэйст блокируются. Такого рода окна используются для входа например на домашний роутер. Я всеже думаю что есть какая-нибудь возможно автоматизировать вход . Подскажите пожалуйста

 

[C2H5OH]

Я у себя решил такую проблему просто.
1. Поставил галочку на "Запомнить пароль"
2. В скрипте поставил

ControlSend("Подключение к ...", "", "[CLASS:Edit; INSTANCE:3]", "{ENTER}")

 

[InnI]

Михаил [?]

В WIN 7 на IE9 такой фокус не проходит.

А если так?

$wnd = WinActivate("Безопасность Windows")
WinWaitActive($wnd)
ControlSetText($wnd, "", "Edit1", "User")
ControlSetText($wnd, "", "Edit2", "Password")
ControlClick($wnd, "", "Button2")

 

[Михаил]

Спасибо большое , вариант с Controlsettext сработал, завтра буду доделывать скрипт до конца !.

 

[Dellroc]

Ещё решение для NTLM авторизации

#include <IE.au3>
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_HTTP_USERNAME_PASSWORD_DISABLE","iexplore.exe","REG_DWORD",0)
$oIE = _IECreate("http://domain%5Cuser:[email protected]/link/",0,1)