Webseite automatisch bis zum Ende scrollen?

attaxx

Wuerde gerne https://twitter.com/ParisHilton/followers bis zum Ende hin scrollen bzw. allgemein wissen wie das geht und zwar im Hintergrund, allerdings funktioniert es bei mir nicht. Bitte um Hilfe.

[autoit]

$t1 = "Paris Hilton (ParisHilton) auf Twitter - Google Chrome"
While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit
Case $Button1 ControlSend ($t1,"","{space}")
EndSwitchWEnd

[/autoit]

Das Space kommt btw nicht mal durch, auch nicht PGDN, dafuer aber z.B. F12

**alpines**

[autoit]

#include <IE.au3>

[/autoit][autoit][/autoit][autoit]

Global $oIE = _IECreate("twitter.com/ParisHilton/followers")
_IELoadWait($oIE)

[/autoit][autoit][/autoit][autoit]

$oIE.Document.ParentWindow.Scroll(0, $oIE.Document.Body.ScrollHeight)

[/autoit]

Du musst aber aufpassen, der scrollt nur einmal runter, wenn ständig neuer Content dazu kommt dann musst du auch immer weiter nach unten scrollen!
Am besten machst du das indem du die

[autoit]

$sHTML = _IEDocReadHTML($oIE)

[/autoit]

vor dem Scrollen und danach vergleichst, er soll solange scrollen bis das davor und danach gleich ist.

So könnte es funktionieren:

[autoit]

Do
$aString = StringRegExp($sSource, "ein String der bei jedem Follower steht", 3)
$oIE.Document.ParentWindow.Scroll(0, $oIE.Document.Body.ScrollHeight)
Sleep(2500) ;Der Sleep dient dazu, das der neue Content (falls einer kommt) erstmal Zeit zum Laden hat. _IELoadWait funktioniert da leider nicht.
$sSource = _IEDocReadHTML($oIE)
Until UBound(StringRegExp($sSource, "ein String der bei jedem Follower steht", 3)) = UBound($aString)

[/autoit]

Das ganze kriegst du im Hintergrund hin, wenn du folgendes verwendest

[autoit]

Global $oIE = _IECreate("twitter.com/ParisHilton/followers", 0, 0)

[/autoit]

Weitere Befehle sowie die Referenz kannst du hier nachschlagen: Funktion _IECreate - AutoIt Hilfe

Vergiss am Ende nicht das

[autoit]

_IEQuit($oIE)

[/autoit]

da dir sonst irgendwann der RAM vollläuft.