Online Tabelleninhalt in Variablen speichern

  • Ich habe diese tabelle:

    HTML

    wie kann ich die Variablen nun füllen ?
    Inetgetsource ist klar...
    Der Inhalt kann sich ändern.

    Einmal editiert, zuletzt von JuraX (7. Mai 2010 um 19:18)

  • nein ich mach n pager sobald sich die Seite ändert.
    Sie wird mit php gefüllt.

    Bisher mach ich das so:

    Spoiler anzeigen
    [autoit]

    #include <Inet.au3>
    #NoTrayIcon

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

    MsgBox(64, "Start", "Der Client wurde gestartet")

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

    HttpSetUserAgent("Firefox")
    $new = _INetGetSource('http://www.online-hiorg.square7.de/index.php')

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

    $old = $new

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

    While (True)
    $new = _INetGetSource('http://www.online-hiorg.square7.de/index.php')
    $param = _INetGetSource('http://www.online-hiorg.square7.de/param.html')

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

    If StringInStr($param, "<!--SILENT-->") < 1 Then

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

    If StringInStr($param, "<!--STOP-APP-->") >= 1 Then
    MsgBox(266288, "Wartung", "Das Programm wird aus Wartungsgründen beendet." & @CRLF & "Das Programm wied nach Wartungsende Automatisch gestartet!" & @CRLF & @CRLF & "JuraX")
    ShellExecute(@ScriptDir & "\sleeper.exe")
    ShellExecuteWait(@ScriptDir & "\sleeper.exe")
    Exit

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

    ElseIf StringInStr($param, "<!--SYSTEMTEST-->") >= 1 Then
    SoundPlay(@ScriptDir & "\alert.mp3")
    ShellExecute(@ScriptDir & " \Testalert.html")
    Sleep(20000)
    $old = $new

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

    ElseIf $new <> $old Then
    SoundPlay(@ScriptDir & "\alert.mp3")
    ShellExecute("http://online-hiorg.square7.de/index.php")
    Sleep(7500)
    SoundPlay(@ScriptDir & "\alert.mp3")
    EndIf
    $old = $new
    EndIf
    Sleep(1500)
    WEnd

    [/autoit]

    Ich will das nun anzeigen in na gui...
    Der link

  • ok das Problem hab ich gelöst...

    Jetzt kommt raus:

    Spoiler anzeigen

    [0]|ID
    [1]|1
    [2]|Wache
    [3]|12-53-1
    [4]|Fahrzeug(e)
    [5]|Fahrzeuge
    [6]|Stra&szlig;e
    [7]|0
    [8]|Plz
    [9]|26555
    [10]|Ort
    [11]|Feuerstadt
    [12]|Telefon
    [13]|Telefon
    [14]|Meldestichwort
    [15]|Explosion
    [16]|Objekt
    [17]|Tankstelle
    [18]|Mitteiler
    [19]|Pol
    [20]|Ma&szlig;nahme
    [21]|Maßnahme
    [22]|Kommentar
    [23]|Nachalamierung vom 40-23-1 EL


    Ich will jetzt also die Roten raus haben und nur die anderen im Array, wie geht das?

    • Offizieller Beitrag

    Ich weiss ja nicht, wie Du zu diesem Array gekommen bist, aber statt jetzt umständlich wieder Einträge aus dem Array zu entfernen, sorge doch lieber dafür, dass sie erst gar nicht dort auftauchen. ;)

    [autoit]


    #include <Array.au3>
    #include <Inet.au3>

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

    HttpSetUserAgent("Firefox")
    $new = _INetGetSource('http://www.online-hiorg.square7.de/index.php')
    $array = StringRegExp($new, '(?s)<td>.+?</td>.+?<td>(.+?)</td>', 3)
    _ArrayDisplay($array)

    [/autoit]
  • kommt leider nicht das was ich brauche...
    Ich bin so dazu gekommen:

    Spoiler anzeigen
    [autoit]

    While (True)
    Sleep(1500)
    $new = _INetGetSource('http://www.online-hiorg.square7.de/index.php')
    $param = _INetGetSource('http://www.online-hiorg.square7.de/param.html')

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

    $array_new = _StringBetween($new,"<td>","</td>")
    _ArrayDisplay($array_new)

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

    If StringInStr($param, "<!--SILENT-->") < 1 Then

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

    If StringInStr($param, "<!--STOP-APP-->") >= 1 Then
    MsgBox(266288, "Wartung", "Das Programm wird aus Wartungsgründen beendet." & @CRLF & "Das Programm wied nach Wartungsende Automatisch gestartet!" & @CRLF & @CRLF & "JuraX")
    ShellExecute(@ScriptDir & "\sleeper.exe")
    ShellExecuteWait(@ScriptDir & "\sleeper.exe")
    Exit

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

    ElseIf StringInStr($param, "<!--SYSTEMTEST-->") >= 1 Then
    SoundPlay(@ScriptDir & "\alert.mp3")
    ShellExecute(@ScriptDir & " \Testalert.html")
    Sleep(20000)
    $old = $new

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

    ElseIf $new <> $old Then
    SoundPlay(@ScriptDir & "\alert.mp3")
    ShellExecute("http://online-hiorg.square7.de/index.php")
    Sleep(7500)
    SoundPlay(@ScriptDir & "\alert.mp3")
    EndIf
    $old = $new
    EndIf
    WEnd

    [/autoit]
    • Offizieller Beitrag

    Achso, da kann manchmal auch ein Leerstring enthalten sein.

    Dann besser so:

    [autoit]


    #include <Array.au3>
    #include <Inet.au3>

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

    HttpSetUserAgent("Firefox")
    $new = _INetGetSource('http://www.online-hiorg.square7.de/index.php')
    $array = StringRegExp($new, '(?s)<td>.+?</td>.+?<td>(.*?)</td>', 3)
    _ArrayDisplay($array)

    [/autoit]