Trying To Add to a File

[Serge]

If it is a simple text file then you can open this file in Append mode.

Dim intFFN As Integer
Dim strPath As String

strPath = "C:\MyFile.txt"
intFFN = FreeFile

Open strPath For Append As intFFN
Print #intFFN, "This is an edition to the file."
Close #intFFN