txt Ergänzen und nicht Überschreiben

[Zero_Cool]

Hallo Zusammen

Ich verwende folgenden Code

Code: Alles auswählen

File1 = ReadFile(#PB_Any, "c:\Programme\File Download\rec.tmp") 
If File1 
  File2 = CreateFile(#PB_Any, "c:\Programme\File Download\out.txt") 
  If File2 
    While Eof(File1) = #False 
      UseFile(File1) 
      Text$ = ReadString() 

        UseFile(File2) 
        WriteStringN(Text$)
    Wend 
    CloseFile(File1) 
    CloseFile(File2) 
  EndIf 
EndIf

Nun möchte ich, dass bei jedem ausführen dieses Code, die out.txt ergänzt aber nicht überschrieben wird? Wie kann ich das bewerkstelligen?

Danke und Gruss Phil

[KeyKon]

Nimm statt CreateFile() OpenFile() geh zum Ende der Datei und schreibe da weiter.

KeyKon

[Zero_Cool]

Okay, das mit Create File leuchtet mir ein, mit welchem Befehl kann ich bis ans Ende der Datei?

[KeyKon]

Entweder du liest bis zum Ende (is aber lahm) oder du gehst mit FileSeek() ans Ende (besser).

KeyKon

[AND51]

Bei geöffneter Datei springst du mit

Code: Alles auswählen

FileSeek(Lof(#Datei))

zum Ende der Datei. Ich weiß aber grad nicht, ob du #Datei (Dateihandle) angeben musst oder nicht.

[KeyKon]

Muss er nich er muss nur vorher UseFile(#File) machen.

KeyKon

[Zero_Cool]

Super! Hat alles besten geklappt! Danke für die Hilfe!

[AND51]

Muss er nich er muss nur vorher UseFile(#File) machen.

KeyKon

Nicht notwendiger weise:
ich sagte "bei geöffneter Datei", dadurch wird die aktuelle Datei auf die gerade, zu weiterbearbeitende Datei gesetzt. Öffne ich also eine Datei z. B. mit OpenFile() ist es so, als würde die funktion auf gleich ein UseFile() ausführen.

Naja, schön, wenns geklappt hat.

[KeyKon]

Muss er nich er muss nur vorher UseFile(#File) machen.

KeyKon

Nicht notwendiger weise:
ich sagte "bei geöffneter Datei", dadurch wird die aktuelle Datei auf die gerade, zu weiterbearbeitende Datei gesetzt. Öffne ich also eine Datei z. B. mit OpenFile() ist es so, als würde die funktion auf gleich ein UseFile() ausführen.

Is mir schon klar, aber wenn man dann zufällig was zwischen Datei öffnen und springen schreibt (aus welchem Grund auch immer) guckt man manchmal schon etwas lange wo der blöde Fehler ist...

KeyKon