Can't access to a form on a website without name-Tag

[jlorenz1]

This simple website http://datki.wropro.pl has only one inputbox and one submit button. How can I access to this form, which has no name-Tag, and how can I change the inputbox. I've tried different things without success.

HTML-Code

<div id="prawa">

<h4>Bot do nabijania datkow via WWW do gier z seri menelgame</h4>

<form method="get" action="javascript:datkuj();">

<input type="submit" value="start" />

<input type="text" name="url" id="url" style="width:350px" value="Link do datkow" onblur="RestoreInput('Link do datkow', this.id);" onclick="ClearInput('Link do datkow', this.id)" />

</form>

AutoIt-Code

$oIE = _IECreate ('datki.wropro.pl', 0, 1)
$oForm = _IEFormGetObjByName ($oIE, 'prawa')
$oText = _IEFormElementGetObjByName ($oForm, 'url')
_IEFormElementSetValue ($oText, 'http://www.google.de')
_IEFormSubmit ($oForm)

Edited May 13, 2010 by jlorenz1

[jlorenz1]

;The solution

#include <IE.au3>

$iSichtbar= 1; 0=unsichtbar, 1= sichtbar

$s=''

$iSpieleranzahl = 23

Dim $aSpieler[$iSpieleranzahl +1]

$aSpieler[1]='7699832|Andrej_501'

$aSpieler[2]='5998632|CoolBoy4'

$aSpieler[3]='3518314|Delta'

$aSpieler[4]='6867276|deryuri'

$aSpieler[5]='7528598|emagrennep'

$aSpieler[6]='7060073|franz_84'

$aSpieler[7]='6010290|Hikikomori'

$aSpieler[8]='8895700|isparta'

$aSpieler[9]='9348956|killerdepp'

$aSpieler[10]='9679174|lumpi01'

$aSpieler[11]='6360543|lysandi'

$aSpieler[12]='8343209|MrDubai'

$aSpieler[13]='3739842|Mr_Schnibli'

$aSpieler[14]='4778227|Penner04'

$aSpieler[15]='3800278|penner_igor'

$aSpieler[16]='9021373|Philipp2'

$aSpieler[17]='3365700|Pisser82'

$aSpieler[18]='6841177|schlampiene1986'

$aSpieler[19]='2786475|Speedomat'

$aSpieler[20]='3427369|stinkbombe'

$aSpieler[21]='2226583|St_Pauli_Fan'

$aSpieler[22]='2965069|vonwitt1'

$aSpieler[23]='2408974|Xylar'

$oIE = _IECreate ('datki.wropro.pl', 0, $iSichtbar)

For $i = 1 to $iSpieleranzahl

$s = $s & $aSpieler[$i] & @CRLF

_IENavigate($oIE, 'datki.wropro.pl', 1)

$oForm = _IEFormGetCollection ($oIE, 0)

$oQuery = _IEFormElementGetCollection ($oForm, 1)

$a = StringSplit($aSpieler[$i],'|')

_IEFormElementSetValue ($oQuery, 'http://muenchen.pennergame.de/change_please/' & $a[1] & '/')

Sleep (1000)

_IEFormSubmit ($oForm)

WinWait('', 'zakonczono', 60000)

Next

_IEQuit ($oIE)

MsgBox(4096, 'Fertig', $s & @CRLF & Chr(169) & '2010 bordsteinlatscher')

Edited May 13, 2010 by jlorenz1