Script geht nicht

  • [autoit]

    $1 = 0
    If Not FileExists ( @DesktopDir & "\ICheck" ) Then
    DirCreate ( @DesktopDir & "\ICheck" )
    EndIf
    If FileExists ( @DesktopDir & "\ICheck\ICheck.ini" ) Then
    $inetsite = IniRead ( @DesktopDir & "\ICheck\ICheck.ini", "Einstellungen", "Internetseite", 0 )
    EndIf
    If Not FileExists ( @DesktopDir & "\ICheck\ICheck.ini" ) Then
    $inetsite = InputBox ( "Internetadresse", "Gib die Internetadresse ein." )
    If $inetsite = "" Then
    MsgBox ( 16, "Fehler", "Bitte etwas eingeben!" )
    Exit
    EndIf
    IniWrite ( @DesktopDir & "\ICheck\ICheck.ini", "Einstellungen", "Internetseite", $inetsite )
    EndIf
    If FileExists ( @DesktopDir & "\ICheck\ICheck.txt" ) Then
    FileDelete ( @DesktopDir & "\ICheck\ICheck.txt" )
    EndIf

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

    While 1
    $text = InetRead ( $inetsite )
    If $1 = 0 Then
    FileWrite ( @DesktopDir & "\ICheck\ICheck.txt", $text )
    $1 = 1
    EndIf
    $checktxt = FileRead ( @DesktopDir & "\ICheck\ICheck.txt" )
    If Not $checktxt = $text Then
    MsgBox ( 32, "Information", $inetsite & " wurde aktualisiert." )
    $question = MsgBox ( 4, "Frage", $inetsite & " Öffnen?" )
    If $question = 6 Then
    ShellExecute( $inetsite )
    EndIf
    Exit
    EndIf
    WEnd

    [/autoit]

    Dieser Script geht nicht.Ich kann auf der jeweiligen Seite soviel wie ich will ändern.Es kommt keine Meldung :(

  • Hi

    [autoit]

    If Not $checktxt = $text Then

    [/autoit]

    sollte entweder

    [autoit]

    If Not ($checktxt = $text) Then

    [/autoit]

    oder

    [autoit]

    If $checktxt <> $text Then

    [/autoit]

    sein!