Textfil

5 svar · 264 visningar · startad av ooostfralla 30 juni 2004

ooostfrallaMedlem sedan nov. 200250 inlägg

Trådstart30 juni 2004 13:24#1

Hej

Jag har en text fil som ska innehålla ett antal rader. Problemet ligger i att varje gång jag försöker skriva i textfilen skriver den nya raden över den gamla. Vad gör jag för fel

Set readfile = Foldersys.OpenTextFile("error_log_Restart.txt", 2, false)

readfile.Writeline ("Error No: " & Number & " - " & descr & " has occurred")
err.clear

JosefMedlem sedan mars 20023 561 inlägg

30 juni 2004 13:31#2

Du kanske måste läsa in det gamla från filen och sedan skriva allt till textfilen igen plus det nya...?

ooostfrallaMedlem sedan nov. 200250 inlägg

30 juni 2004 13:45#3

Halv löst

Hej
felet låg i appaend
Set readfile = Foldersys.OpenTextFile("error_log_Restart.txt", 8, false)

men nu har jag ett annat fel och det är att det inte blir på en ny rad.

JosefMedlem sedan mars 20023 561 inlägg

30 juni 2004 13:57#4

Då kan du ju köra en fuling:

readfile.Writeline (vbCrlf & "Error No: " & Number & " - " & descr & " has occurred")

För att få ett radbyte i början.

ooostfrallaMedlem sedan nov. 200250 inlägg

1 juli 2004 06:50#5

Tack

Tackar.. Det fungerar helt underbart.

JosefMedlem sedan mars 20023 561 inlägg

1 juli 2004 07:09#6

Då får du gärna markera inlägget som löste problemet ("Acceptera som slutgiltigt svar").