Nur erste Ping-Abfrage im Script funktioniert

Hallo zusammen.

Ich habe mir ein kleines script geschrieben, das mir aus einer csv-Datei PC-Namen ausliest. anschließend speichert er in einer separaten Textdatei Informationen dazu, ob die Geräte gerade an sind oder nicht:

$handle=FileOpen("Mappe2.csv")
$content=FileRead($handle)
FileClose($handle)
$handle=FileOpen("ausgabe.txt", 10)
$array=StringSplit($content, Chr(13))
$i=1
While ($i<$array[0])
$returnvalue=Ping($array[$i], 200)
If $returnvalue=0 Then
FileWriteLine($handle, "Host " & $array[$i] & " seems to be offline.")
Else
TCPStartup()
FileWriteLine($handle, "Host " & $array[$i] & " seems to be online (Response time: " & $returnvalue & "ms). IP is " & TCPNameToIP($array[$i]))
TCPShutdown()
EndIf
$i=$i+1
Sleep(100)
WEnd
FileClose($handle)

Vollkommen Minimalprinzip, keine Frage.
Allerdings funktioniert nur der erste Ping korrekt, alle weiteren PCs in der Liste seien angeblich offline.
Stimmt aber nicht, nehme ich einen aus der Liste und Pinge diesen in cmd, gehts problemlos. Also was mache ich falsch?

Vielen Dank und viele Grüße,
Weisgarnix

Erstmal danke für die raschen Rückmeldungen.

Für die Verwendung der While-Schleife sag ich Sry, hatte die Syntax der For-Schleife nicht im Kopf. While ist außerdem mächtiger als For, aber die Diskussion soll hier lieber nicht losgetreten werden

Leider klappt auch der Code von kra88 nicht besser als meiner. Das Array ist korrekt (am Ende eine Leerzeile, die bearbeite ich mit meinem Code einfach nicht und gut is).
Selbes Ergebnis: Der Ping für die erste Abfrage funktioniert, der Rest ist angeblich offline - ohne, dass ich dafür einen Grund finde. Ich kann noch versuchen, über das @Error-Flag was rauszufinden.
Verwende AutoIt in Version 3.3.8.1 unter Windows 8 x64 mit aktuellen Sicherheitsupdates.

Hi Oscar.

@CRLF

Daran lags! Danke dir!