Liste aus HTML Quell-Code ermittel

  • Hi,

    ich schreibe zurzeit ein Tool, was mir die Folding@Home Stats meines Teams in ne DB schreibt. Nun habe ich das Problem, dass ich nciht so recht weiß wo ich anfangen bzw. womit ich den HTML Code der Page zerlegen soll.

    Hier der HTML Code von der Seite (zur Seite:(

    Spoiler anzeigen

    Rauskommen soll dan dass z.B.

    Spoiler anzeigen
    [autoit]


    $username[1] = "Schenklklopfer-XP"
    $username[2] = "P"
    $username[3] = "Michi26206"
    $username[4] = "greenwood"

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

    $points[1] = "21081"
    $points[2] = "19021"
    $points[3] = "10544"
    $points[3] = "9583"

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

    $wu[1] = "53"
    $wu[2] = "44"
    $wu[3] = "23"
    $wu[4] = "30"

    [/autoit]

    Das ganze soll natürlich dynamisch bis zum letzten user gehen (d.h. wenn ein neuer Use rhinzu kommt, das der auch aufgenommen wird)

    Michi26206

    Einmal editiert, zuletzt von Michi26206 (10. Mai 2009 um 19:51)

  • [autoit]

    #include <array.au3>
    #include <Inet.au3>
    $html = _INetGetSource("http://fah-web.stanford.edu/cgi-bin/main.py?qtype=teampage&teamnum=158376")
    $username = StringRegExp($html, 'name=.+ (.+) </a> </TD>', 3)
    $points = StringRegExp($html, 'pts=\d+".+ (.+) </a> </TD>', 3)
    $wu = StringRegExp($html, 'pts=\d+&.+ (.+) </a> </TD>', 3)
    _ArrayDisplay($username)
    _ArrayDisplay($points)
    _ArrayDisplay($wu)

    [/autoit]
  • WoW, cool danke.

    Ist besser wie meine Lösung. Hab mir nämlich mithilfe von der Datei: http://fah-web.stanford.edu/daily_user_summary.txt

    Auch was gemacht:

    Spoiler anzeigen
    [autoit]

    #include<Array.au3>
    #include <file.au3>
    Dim $aRecords, $data
    If Not _FileReadToArray("daily_user_summary.txt", $aRecords) Then
    MsgBox(4096, "Fehler", "Fehler beim einlesen der Datei in das Array Fehler:" & @error)
    Exit
    EndIf
    For $x = 3 To 20
    $data = StringSplit($aRecords[$x], " ")
    MsgBox(0, "Rang " & ($x - 2), "Name: " & $data[1] & @CRLF & "Points: " & $data[3] & @CRLF & "Team: " & $data[4] & @CRLF)
    Next

    [/autoit]

    War nämlich am überlegen das für mehere zu machen. Aber von der performance ist dein besser. Deshalb nehm ich das auch. Danke!