Mit Textdateinen arbeiten!

[Christopher]

Hallo Entwickler, ich breche mir gerade einen mit arbeiten von Textdateien ab :-( bis jetzt habe ich es auch nie gebracht.

Folgende Situation:

Ich habe eine Textdatei die schon gewisse Zeilen enthält ich will diese Textdatei öffnen und nach diesen vorhandenen Zeilen eine neue Zeile einfügen mit Informationen einfügen.

z.B.

Zeile 1
Zeile 2
Zeile 3
Neue Zeile


Ich bin soweit das ich ein Textdatei öffne aber die alten Informationen werden immer überschrieben :-(.

Danke für Eure Hilfe.

Dim fileNum As Integer      
      fileNum% = Freefile()
      Open "c:\Lotus\Notes\Data\test.txt" For Output As fileNum%                               
         Print #fileNum%, "123"      
         Print #fileNum%, "ey"      
         Print #fileNum%, "ab"            
         
      
      Close fileNum%

[eknori]

wie öffnest du denn ? for append ?

[klaussal]

nee, steht doch da: for Output ! Das ist der Fehler !

[koehlerbv]

Das ursprüngliche Posting wurde später editiert, vorher stand da noch kein Code. Daher konnte Ulrich da auch nix sehen und musste fragen, Klaus.

Bernhard

[Christopher]

Danke Eknori, das war der Fehler :-) jetzt möchte ich die Zeile wieder entfernen die ich eingefügt habe hat jemand von Euch noch eine Idee?

@koehlerbv, hast recht ich dacht etwas code ist nicht schlecht :-) sorry

[eknori]

puh, ich denke nicht, das das sooo einfach ist; du kannst ja ein einer "sequentiellen" Datei nicht positionieren.
Daher wird dir nur der Weg bleiben die Datei Zeile für Zeile zu lesen bis EOF und jede Zeile, bis auf die letzte in eine neue Datei zu schreiben. Dann sourcefile close und delete und das Targetfile source und rename, damit du den alten Namen wiederhast.

Wofür brauchst du das eigentlich ?

[koehlerbv]

Da dort sequentiell gearbeitet wird, ist das Entfernen nicht möglich. Hierzu müsstest Du die gewünschten Zeilen aus File A in ein File B schreiben, File A löschen und File B umbenennen.

Bernhard

[Christopher]

Ja ich habe gerade ein ID Archiv gebaut wo man die ID - Dateien direkt recertifizieren kann. Den Kennwortdialog fange ich mit dem Password Hook  
von Davy Vanherbergen  ab. Somti kann ich z.B. ein große Anzahl von ID´s mit verschiedenen Kennwörtern ganz schnell recertifiziern. Das Kennwort wird in pwdhook.txt geschrieben. Will jemand evtl. das Archiv haben?