ich hab mal wieder ein problem ich hab eine .txt an deren ende immer wieder
neue sachen eingefügt werden.... jetzt möchte ich das wenn es mehr als 5
zeilen sind löscht es die erste und rückt die andren nach oben...
ich hab es so versucht:
(geht aber irgend wie ich)
While 1
$iHelp = FileReadLine(@ScriptDir & "\Data\log.txt",20)
if $iHelp <> "" Then
$line1 = FileReadLine(@ScriptDir & "\Data\log.txt",1)
$line2 = FileReadLine(@ScriptDir & "\Data\log.txt",2)
$line3 = FileReadLine(@ScriptDir & "\Data\log.txt",3)
$line4 = FileReadLine(@ScriptDir & "\Data\log.txt",4)
$line5 = FileReadLine(@ScriptDir & "\Data\log.txt",5)
_FileWriteToLine(@ScriptDir & "\Data\log.txt",1,$line2,1)
_FileWriteToLine(@ScriptDir & "\Data\log.txt",2,$line3,1)
_FileWriteToLine(@ScriptDir & "\Data\log.txt",3,$line4,1)
_FileWriteToLine(@ScriptDir & "\Data\log.txt",4,$line5,1)
_FileWriteToLine(@ScriptDir & "\Data\log.txt",5,"",1)
endif
WEnd