AutoIt: manquant Wend pour Bien

Question

Tous,

Voici le code que je l'ai écrit dans AutoIT.

    $fileToWrite = FileOpen("C:\output.txt", 1)

If FileExists("C:\test.csv") Then
    $fileHandle= FileOpen("test.csv", 0)
    If ($fileHandle = -1) Then
        MsgBox (0, "Error", "Error occured while reading the file")
        Exit
    Else
        While 1
            $currentLine = FileReadLine($fileHandle)
            If @error = -1 Then ExitLoop
            $days = StringSplit($currentLine, ",")
            FileWrite($fileToWrite,$days[2] & ", " & $days[9] & @CRLF)
            EndIf
        Wend
    EndIf
Else
    MsgBox (0, "Error", "Input file does not exist")
EndIf

FileClose($fileToWrite)
FileClose($fileHandle)

Et l'ensemble de l'erreur:

C:\ReadCSV.au3(14,4) : ERROR: missing Wend.
            EndIf
            ^
C:\ReadCSV.au3(9,3) : REF: missing Wend.
        While
        ^
C:\ReadCSV.au3(15,3) : ERROR: missing EndIf.
        Wend
        ^
C:\ReadCSV.au3(3,34) : REF: missing EndIf.
If FileExists("C:\test.csv") Then
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\ReadCSV.au3(15,3) : ERROR: syntax error
        Wend
        ^
C:\ReadCSV.au3 - 3 error(s), 0 warning(s)
>Exit code: 0    Time: 3.601

Je ne suis pas en mesure de comprendre la question ici puisque j'ai un Wend et EndIf pour chaque boucle While et une condition if. Suis-je manque quelque chose ici?

Answer 1

Puisque vous avez la commande ExitLoop après la then, il n'y a pas besoin pour le EndIf.

(Dans cette ligne: If @error = -1 Then ExitLoop)

Vous pouvez soit:

1. Supprimer le EndIf

   While 1
       $currentLine = FileReadLine($fileHandle)
       If @error = -1 Then ExitLoop
       $days = StringSplit($currentLine, ",")
       FileWrite($fileToWrite,$days[2] & ", " & $days[9] & @CRLF)
   Wend
   

2. Déplacer le ExitLoop à la ligne suivante. (Ce qui ne fait pas beaucoup de sens, mais le script continue à fonctionner.)

   While 1
       $currentLine = FileReadLine($fileHandle)
       If @error = -1 Then
       ExitLoop
       $days = StringSplit($currentLine, ",")
       FileWrite($fileToWrite,$days[2] & ", " & $days[9] & @CRLF)
       EndIf
   Wend
   

J'aller avec # 1.

Answer 2

Le problème est que vous avez un Endif avant la Wend et la If est déjà fermée parce que vous avez ExitLoop là-bas.

Alors, soit retirer le Endif ou mettre le ExitLoop ailleurs.