hi, ich bins mal wieder
Ich hab im folgenden Code festgelegt, dass er bei einem Counter < 3
einen Random Befehl ausführt und mit dessen Wert dann eine bestimmte Seite öffnet. Das ganze ist in einer Dauerschleife. Kann man aber verhindern, dass er bei nächsten Durchlauf vll noch einmal dieselbe Seite anklickt? (also eine gewisse Kontrolle des Zufalls^^ bewirken)
Danke im vorraus.
Spoiler anzeigen
#include <IE.au3>
$oIE=_IECreate("http://",0,1)
$counter=0
While 1
_IELoadWait($oIE) ; warten bis Seite geladen
$counter=$counter+1
If $counter<3 Then
$seite=Random(1,4,1)
If $seite=1 Then
$oDocLinks = _IELinkGetCollection ($oIE); gibt links als Collection aus
For $olink IN $oDocLinks
if StringInStr ( $olink.outerText , "items") Then ; der anzuklickende Link
$zeit=Random(40312,47623,1)
sleep($zeit) ; gibt zufallswert aus und Sleep übernimmt den Wert
$olink.click() ; der Klick auf den Link
ExitLoop
EndIf
Next
ElseIf $seite=2 Then
$oDocLinks = _IELinkGetCollection ($oIE); gibt links als Collection aus
For $olink IN $oDocLinks
if StringInStr ( $olink.outerText , "modifikationen") Then ; der anzuklickende Link
$zeit=Random(35001,55131,1)
sleep($zeit) ; gibt zufallswert aus und Sleep übernimmt den Wert
$olink.click() ; der Klick auf den Link
ExitLoop
EndIf
Next
ElseIf $seite=3 Then
$oDocLinks = _IELinkGetCollection ($oIE); gibt links als Collection aus
For $olink IN $oDocLinks
if StringInStr ( $olink.outerText , "die story") Then ; der anzuklickende Link
$zeit=Random(40878,49851,1)
sleep($zeit) ; gibt zufallswert aus und Sleep übernimmt den Wert
$olink.click() ; der Klick auf den Link
ExitLoop
EndIf
Next
ElseIf $seite=4 Then
$oDocLinks = _IELinkGetCollection ($oIE); gibt links als Collection aus
For $olink IN $oDocLinks
if StringInStr ( $olink.outerText , "underground") Then ; der anzuklickende Link
$zeit=Random(38543,51923,1)
sleep($zeit) ; gibt zufallswert aus und Sleep übernimmt den Wert
$olink.click() ; der Klick auf den Link
ExitLoop
EndIf
Next
EndIf
EndIf
WEnd