Чую, что тут мудрый совет кроется, но поздновечерной мозг отказывается увидеть витамин. Разъясните плз.
#include <IE.au3>
_ready()
Func _ready()
$h_HWND = WinGetHandle('[Title:Ortel Mobile ::: Connecting your world - Windows Internet Explorer; Class:IEFrame]')
$o_Obj = _IEAttach($h_HWND, 'HWND')
$inputs = _IETagNameGetCollection($o_Obj, 'input')
For $input In $inputs
If $input.name == "nachname" Then $INPUT.value = "test"
Next
EndFunc
#include <IE.au3>
$oIE = _IECreate('http://www.ortelmobile.de/de-DE/sim-aktivierung/')
$sHTML = _IEBodyReadHTML($oIE)
$sUrl = StringRegExpReplace($sHTML, '(?si).*?<iframe.*?src="(.*?)"\s.*', '$1')
If @extended <> 1 Then
MsgBox(16, 'Error', 'StringRegExpReplace')
Exit
EndIf
_IENavigate($oIE, $sUrl)
$oForm = _IEFormGetCollection($oIE, 0)
$oSelect_1 = _IEFormElementGetObjByName($oForm, 'anrede')
_IEFormElementOptionSelect($oSelect_1, 'Frau')
$oName = _IEFormElementGetObjByName($oForm, 'nachname')
_IEFormElementSetValue($oName, 'Test')
$oSelect_2 = _IEFormElementGetObjByName($oForm, 'land')
_IEFormElementOptionSelect($oSelect_2, 'Alaska')
;...дальше по аналогии
Грамотное название темы, это не прихоть модератора де сада. Это нужно, для того чтобы другие вопрошающие, могли с пользой для себя использовать поиск, чтобы не создавались дублирующие темы по смыслу, но разные по названию, чтобы вам могли сразу же ответить и не писать вам предупреждения, которые вытекают из вашего нежелания придерживаться правил форума.
Изменить ситуацию в ваших силах!
На данный момент вы забыли пункт Б.5 правил форума, с которым ознакомились при регистрации. ;)
Вы довольны решением?
