Skrive til textfil i VB6 ?

du skal aktivere "microsoft scripting runtime" under project -> references

Dette skulle virke uden at saette referencer:

Open "C:\testfil.txt" for output as #1
Print #1, "Dette er en test"
Close #1

Hvis du ønsker at tilføje tekst til en fil, så gør du sådan.


Private Sub Form_Load()
Dim nFree As Integer
  nFree = FreeFile
  Open "C:\testfil.txt" For Append As #nFree
    Print #nFree, "Dette er en test som bliver tilføjet til et tekst-file med linjeskift."
    Print #nFree, "Dette er en test som bliver tilføjet til et tekst-file med uden linjeskift."; ' <-- Ender på ";"
  Close #nFree
End Sub

Fandt en kanon artikel her:

http://www.udvikleren.dk/VB/Article.aspx/81/