jlorenz1 Posted May 13, 2010 Share Posted May 13, 2010 (edited) 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 Johannes LorenzBensheim, Germanyjlorenz1@web.de[post="12602"]Highlightning AutoIt Syntax in Notepad++ - Just copy in your Profile/application data/notepad++[/post] Link to comment Share on other sites More sharing options...
jlorenz1 Posted May 13, 2010 Author Share Posted May 13, 2010 (edited) ;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 Johannes LorenzBensheim, Germanyjlorenz1@web.de[post="12602"]Highlightning AutoIt Syntax in Notepad++ - Just copy in your Profile/application data/notepad++[/post] Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now