Код:
;регистрация почтового ящщика в gmail.com
;полная иметация действий человека
$GmailAddress = "its.my.login85"
$Passwd = "itsmypass85"
$FirstName = "Dron"
$LastName = "Gandon"
$BirthDay = 10
$BirthMonth = "04"
$year = 1978
#include <IE.au3>
$oIE = _IECreate("http://www.google.com/");открываем дом. стр. гугла в ИЕ
_IELoadWait($oIE, 20, 60000);ждём полной загрузки док-та
$oLinks = _IELinkGetCollection ($oIE);получаем все ссылки на стр.
For $oLink In $oLinks;ищщем ссылку для авторизации
if StringRegExp($oLink.href, "/ServiceLogin?")==1 Then;если ссылка найдена
_IEaction($oLink, "click");кликаем по ней
EndIf
Next
_IELoadWait($oIE, 20, 60000);ждём полной загрузки док-та
;страница авторизации
_IELinkClickByIndex($oIE, "link-signup")
_IELoadWait($oIE, 20, 60000);ждём полной загрузки док-та
;страница регистрации
_IEAction("FirstName", "click")
$oForm = _IEFormGetCollection($oIE, "createaccount")
$oFirstName = _IEFormElementGetObjByName($oForm, "FirstName")
$oLastName = _IEFormElementGetObjByName($oForm, "LastName")
$oGmailAddress = _IEFormElementGetObjByName($oForm, "GmailAddress")
$oPasswd = _IEFormElementGetObjByName($oForm, "Passwd")
$oPasswdAgain = _IEFormElementGetObjByName($oForm, "PasswdAgain")
$oBirthDay = _IEFormElementGetObjByName($oForm, "BirthDay")
$oBirthMonth = _IEFormElementGetObjByName($oForm, "BirthMonth")
;$oPasswdAgain = _IEFormElementGetObjByName($oForm, "PasswdAgain")
_IEAction($oFirstName, "focus")
_IEAction($oFirstName, "click")
_IEFormElementSetValue($oFirstName, $FirstName)
_IEAction($oLastName, "focus")
_IEAction($oLastName, "click")
_IEFormElementSetValue($oLastName, $LastName)
_IEAction($oGmailAddress, "focus")
_IEAction($oGmailAddress, "click")
_IEFormElementSetValue($oGmailAddress, $GmailAddress)
_IEAction($oPasswd, "focus")
_IEAction($oPasswd, "click")
_IEFormElementSetValue($oPasswd, $Passwd)
_IEAction($oPasswdAgain, "focus")
_IEAction($oPasswdAgain, "click")
_IEFormElementSetValue($oPasswdAgain, $Passwd)
_IEAction($oBirthDay, "focus")
_IEAction($oBirthDay, "click")
_IEFormElementSetValue($oBirthDay, $BirthDay)
_IEFormElementOptionSelect($oBirthMonth, $BirthMonth, 0, "byIndex")Строго не судите, начал изучать только ночью, ну а на чём эксперементировать, как не на гугле :laugh:
поля заполняю, а как дошёл до выбора месяца, заглох
Код:
--> IE.au3 V2.4-0 Error from function _IEAction, $_IEStatus_InvalidDataType
--> IE.au3 V2.4-0 Error from function _IEFormElementOptionSelect, $_IEStatus_InvalidObjectType
Не могу понять, что он хочет, ведь всё остальное работает и у других в примерах посмотрел, всё вроде также
