Læse og skrive til .TXT fil

<quote>Hej Alle

Er der en der kan hjælpe mig med lidt oplysninger vedrørende om hvordan man kan læse i en
txt fil og hvordan man kan skrive til denne med en ny post/linie. Den må ikke slette noget eller
slette andre linier når den skriver til denne txt fil.

Hilsen

Mickey Larsen</quote>

Hej.

Kik i MSDN, der står en masse om det.

Her lidt kode:

Private Sub Form_Load()

Dim strfile, buf As String
Dim size, pos As Long ' bliver ikke brugt

strfile = "D:\\test.txt"

Open strfile For Input As #1

Do Until EOF(1) ' Åben filen og læs alle linjere, og luk filen igen
Line Input #1, buf
Debug.Print buf
Loop
Close #1

Open strfile For Append Access Read Write As #1

Do Until EOF(1) ' Åben filen og gå til sidste linje, og skriv 1 ny linje
Line Input #1, buf
Loop
Print #1, "test line"
Close #1
End Sub

Hvis koden ikke kan finde en fil, melder den om fejl.

M.V.H kim

Hej Kim.

Hvordan får jeg den til at indlæse i txtedit.text i stedet for Immediate boksen?
Når jeg sætter buf om til txtedit.text siger den bare:


Compile error:
Variable required - can't assign to this expression


Hvad har jeg gjort forkert?

Med Venlig Hilsen
Morten Torndahl Pedersen