ok ich bekomme nurnoch fehler und poste jetzt das ganze script
Spoiler anzeigen
#include <String.au3>
#include <INet.au3>
#include <Array.au3>
#include <GUIConstants.au3>
#NoTrayIcon
HotKeySet("{Escape}", "_kill")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]$source = _INetGetSource ("*URL*")
[/autoit] [autoit][/autoit] [autoit]$zahl = _StringBetween($source, '*****', "</td>")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]$ergebnis = $zahl[0]
if @error then
return (0)
EndIf
GUICreate ("",107, 49, 42, 141,-1)
$label = GUICtrlCreateLabel($ergebnis, 32, 12, 46, 17)
GUISetState(@SW_SHOW)
While 1
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]$source = _INetGetSource ("*URL*")
[/autoit] [autoit][/autoit] [autoit]$zahl = _StringBetween($source, '*****', "</td>")
[/autoit] [autoit][/autoit] [autoit];$zahl = _StringBetween($source, '<td align="center" bgcolor="#800000">', "</td>")
$ergebnis = $zahl[0]
GuiCtrlSetData($label, $ergebnis)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]sleep(100)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]$msg = GUIGetMsg($zahl)
[/autoit] [autoit][/autoit] [autoit]If $msg = $GUI_EVENT_CLOSE Then
ExitLoop
EndIf
[/autoit] [autoit][/autoit] [autoit]sleep(2000)
[/autoit] [autoit][/autoit] [autoit]Wend
[/autoit] [autoit][/autoit] [autoit]Func _kill()
[/autoit] [autoit][/autoit] [autoit]Exit
Exit
Exit
EndFunc