#include <IE.au3>
$login = "MyUserName"
$pass = "MyPassword"
$oIE = _IECreate("https://mt.opc.com/mt/")
_IELoadWait ($oIE, 1000) ; задержка нужна, что бы отработал JavaScript
Local $oForm = _IEGetObjById($oIE, "id_form")
Local $iLogin = _IEFormElementGetObjByName($oForm, "userName")
_IEFormElementSetValue($iLogin, $login)
_IEAction($iLogin, "focus") ; focus понадобился, чтобы активировать форму (имитировать выделение поля для того, что бы сработал JS "ONINPUT")
Local $iPass = _IEFormElementGetObjByName($oForm, "password")
_IEFormElementSetValue($iPass, $pass)
_IEAction($iPass, "focus") ; focus понадобился, чтобы активировать форму (имитировать выделение поля для того, что бы сработал JS "ONINPUT")
Local $hWnd = _IEPropertyGet($oIE, "hwnd")
; Делаю активным элемент по id, что бы потом "нажать по нему" пробелом (SPACE использую потому, что на него реагирует форма и переводит CheckBox в состояние check/uncheck)
Local $oForm2 = _IEGetObjById($oIE, "id_form2")
_IEAction($oForm2, "focus")
ControlSend($hWnd, "", "[CLASS:Internet Explorer_Server; INSTANCE:1]", "{SPACE}")
; Делаю активным элемент по id, что бы потом "нажать по нему" пробелом (SPACE использую потому, что на него реагирует форма и нажимается кнопка SingIn, срабатывает "ONCLICK")
Local $oForm3 = _IEGetObjById($oIE, "id-form3")
_IEAction($oForm3, "focus")
ControlSend($hWnd, "", "[CLASS:Internet Explorer_Server; INSTANCE:1]", "{SPACE}")