AHK: Авторизация на сайте

oIE:=ComObjCreate("InternetExplorer.Application")
oIE.navigate("https://login.mts.ru:443/amserver/UI/Login?service=lk&goto=https://lk.ssl.mts.ru/")

While, oIE.busy
   Sleep, 500

; создаются "свои" атрибуты и присваиваются им нужные значения
newValue1:=oIE.document.createAttribute("value"), newValue1.nodeValue:="9999999999" ; номер
newValue2:=oIE.document.createAttribute("value"), newValue2.nodeValue:="999999" ; пароль
; подменяются атрибуты у конкретных узлов
oIE.document.getElementById("IDToken1").setAttributeNode(newValue1)
oIE.document.getElementById("IDToken2").setAttributeNode(newValue2)
; эмулируется клик
oIE.document.getElementById("Login.Submit").click

; переадресация довольно медленная, причём были такие прецеденты,
; когда после авторизации в личный кабинет я так и не попадал...
Loop
   Sleep, 750
Until, oIE.locationURL="https://lk.ssl.mts.ru/" Or A_Index=10
If !oIE.locationURL
{
   MsgBox, 262160, % "An error occured:", % "URL is unreachable.", % 1.5
   ExitApp
}

; мы попали в кабинет, но нужные нам узлы или не существуют (на странице они иногда отсутствуют),
; или всё ещё без значений, проверять начнём с тех, что грузятся дольше остальных
Loop
{
   If oIE.document.querySelector("div[id=wdg-1740]") And !points
   {
      Loop
         Sleep, 500
      Until, oIE.document.querySelector("div[id=wdg-1740] h3").children[1].textContent Or A_Index=5

      points:=oIE.document.querySelector("div[id=wdg-1740] h3").children[1].textContent
      textNode:=oIE.document.querySelector("div[id=wdg-1740] h3").childNodes.item(4).wholeText
   }
   If oIE.document.querySelector("div[id=wdg-1774]") And !tariff
   {
      Loop
         Sleep, 500
      Until, oIE.document.querySelector("div[id=wdg-1774] h3").children[1].textContent Or A_Index=5

      tariff:=oIE.document.querySelector("div[id=wdg-1774] .h-l").children[0].textContent
   }
   Sleep, 500
}
Until, (points And tariff) Or A_Index=3
; этот узел проверять нет необходимости, он всегда существует (изначально показывая нули),
; но пока проверялись другие, он уже обновился
balance:=oIE.document.querySelector(".h-l").children[0].innerText
onDate:=oIE.document.querySelector(".h-l").children[1].innerText
oIE.quit

MsgBox, 262208
      , % tariff ? tariff:A_Space
      , % balance "`n"onDate (points ? "`n"Trim(textNode)": "points:"")