Ich habe eine Text datei.
Code
Hans1|5|21.12.2010
Hans2|8|22.12.2010
Hans3|4|23.12.2010
Hans4|96|24.12.2010Und dieser soll eine Zeile ergänzt werden.
Ich habe es so versucht, aber er überschreibt immer nur dieletzte Zeile.
$Submit = "Hans5|65|25.12.2010"
_FileReadToArray(@TempDir&"/Reports.txt",$aRecords)
Dim $NewFileWrite[$aRecords[0]+1]
$i = 0
For $x = 1 To $aRecords[0]
$NewFileWrite[$i] = $aRecords[$x]
$i = $i + 1
Next
$x = UBound($NewFileWrite)
$NewFileWrite[$i] = $Submit
_ArrayDisplay($NewFileWrite)
_FileWriteFromArray(@TempDir&"/Reports.txt",$NewFileWrite)
