_IE auslesen

  • HI alle zusammen,
    Ich hab mal ne Frage, wie kann mit den IE befehlen sachen auslesen.
    Wie zum beispiel bei pennergame möchte ich das geld auslesen. der betrag soll dann hinterher auf einem label stehen.
    ?(

  • [autoit]

    #include <IE.au3>
    ;=========================================================================
    $IE = _IECreate("http://www.autoit.de", 0, 1)
    $Variable = _IEBodyReadHTML($IE)
    $String = StringInStr($Variable, "<span>Mein Profil</span>")
    MsgBox(0, "Mein Profil", "Im Quelltext wurde " & $String & " gefunden!")
    ;=========================================================================
    ;Tut mir leid, aber das mit String hab ich noch nicht so richtig kappiert.
    ;Versuch du es mal, wenn du kein Internet Explorer offen haben willst mach
    ;einfach _IECreate("http://www.autoit.de", 0, 0) dann ist es versteckt
    ;oder versuch es mit TCP aber versuch es einfach mal ;)
    ;Viel Spass
    ;=========================================================================

    [/autoit]

    Ja, das mit String hab ich nicht kapiert, aber glaub mal das, das schon was ist :).

  • Der gibt mir immer den Wert 0 zurück, und nicht zum beispiel den Geld Betrag^^

    Ich habe hier im Forum das gefunden, um zu sehen wie viele spieler online sind, aber selbst das klappt net: :(

    [autoit]

    #include <Inet.au3>
    #include <String.au3>
    #include <GuiConstantsEx.au3>

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

    GUICreate("test", 650, 500)

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

    $sonline = _StringBetween(_INetGetSource("http://pennergame.de/login/"), '<td style="text-align:right;">', 'Spieler online</span>')
    $online = StringTrimLeft($sonline[0], 11)
    GUICtrlCreateLabel("" & $online & " Spieler online", 540, 485);spieleronline
    GUISetState()

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

    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE

    [/autoit]


    Es kommt immer diese Error Meldung:

    Code
    $online = StringTrimLeft($sonline[0], 11)
    $online = StringTrimLeft($sonline^ ERROR