Авторизация на сайте через Powershell

В качестве дополнительного интернета пользуюсь услугами PEOPLEnet (есть такой оператор 3G интернета в Украине). Для того, чтобы узнать состояние счёта нужно отправить sms на определённый номер, либо зайти в систему самообслуживания. Как первое, так и второе делать всегда лень, а за состоянием счёта следить нужно. В очередной раз пополняя счёт подумал, а нельзя-ли упростить процедуру определения состояния счёта, тем более, что ни номера, на который нужно слать sms, ни своего номера/пароля от системы самообслуживания я не помню, а браузерам хранить пароли я не доверяю. Так появилась идея написать скрипт, который сам будет заходить на сайт, коннектиться, проверять счёт, а мне будет только выводить результат.

Поискав немного в интернете понял, что я далеко не первый, кому лень вводить логины / пароли кто захотел сделать подобный скрипт.

Немного повозившись родилось решение. Попробую описать ход мыслей.

Для того, чтобы войти в систему самообслуживания нужно заполнить следующую форму:

Исследуя код страницы можно увидеть, что форма для авторизации называется LoginForm, а поля для ввода номера и пароля X_Username и X_Password соответственно.

Этого достаточно, чтобы начать писать скрипт.

Для начала вводим номер, пароль и адрес страницы:

$login = "number"
$password = "password"
$url = "http://my.people.net.ua"

Создаём объект InternetExplorer, загружаем страницу и ждём окончания загрузки:

$IE = New-Object -ComObject InternetExplorer.Application
$IE.Navigate($url)
While ($IE.Busy)
{ Start-Sleep -Milliseconds 100 }

Можно убедиться, что форма одна, и называется она LoginForm:

$IE.Document.forms | Select-Object name

Заполняем форму, нажимаем кнопку входа, и ждём пока загрузится:

$form = $IE.Document.forms.namedItem("LoginForm")

$form.item("X_Username").value = $login
$form.item("X_Password").value = $password
($form | Where-Object {$_.value -eq "Вхід"}).click()

While ($IE.Busy)
{ Start-Sleep -Milliseconds 100 }

После того, как страница загрузится нужно только посмотреть на её содержимое. Из всей страницы, нас интересует только одна строка, которая в обычном виде выглядит следующим образом:

Как мне показалось достать эту строку из всего текста проще всего с помощью свойства innerText, содержащего весь текст страницы, и выбрав только интересующую информацию с помощью регулярного выражения:

$text = $IE.Document.documentElement.innerText

# Закрываем IE
$IE.Quit()

# .+ - один, или несколько любых символов
$regex = [regex]'Стан рахунку:.+грн.'
$regex.Match($text) | Select-Object -ExpandProperty value

Результат:

Что и требовалось.