#include <IE.au3>
Global $sUrl, $oIE
$sUrl = "https://qiwi.com/"
$oIE = _IECreate($sUrl)
If StringInStr(_IEBodyReadHTML($oIE), ">Войти в мой кошелек</div>") > 0 Then
$oPhone = _IEGetObjById($oIE, "phone")
$oPassword = _IEGetObjByName($oIE, "password")
$oButtonLogin = _IETagNameGetCollection($oIE, "button", 0)
_IEFormElementSetValue($oPhone, "+79123456789"); ваш номер телефона
_IEFormElementSetValue($oPassword, "superqwert"); ваш пароль
_IEAction($oButtonLogin, "click"); Войти
EndIf
$sUrl = "https://qiwi.com/payment/form.action?provider=99"
_IENavigate($oIE, $sUrl)
$oAccount = _IEGetObjById($oIE, "account")
$oAmountInteger = _IEGetObjByName($oIE, "amountInteger")
$oAmountFraction = _IEGetObjByName($oIE, "amountFraction")
$oExtraComment = _IEGetObjByName($oIE, "extra['comment']")
$oButtons = _IETagNameGetCollection($oIE, "button")
For $oButton In $oButtons
If StringInStr(_IEPropertyGet($oButton, "innerhtml"), "<span>Оплатить</span>") > 0 Then
$oButtonPay = $oButton
ExitLoop
EndIf
Next
_IEFormElementSetValue($oAccount, "+79048765432"); кому отправить деньги
_IEFormElementSetValue($oAmountInteger, "100"); сумма в рублях
_IEFormElementSetValue($oAmountFraction, "00"); копейки
_IEFormElementSetValue($oExtraComment, "Проверка: оплата из скрипта"); комментарий
_IEAction($oButtonPay, "click"); Оплатить