Hi,
-----------------------------------------------------------
Dim OutFile as byte
outfile=freefile
Open "c:\temp\text.txt" for output as #outfile
print #outfile, "First line"
close #outfile
outfile=freefile
Open "c:\temp\text.txt" for append as #outfile
print #outfile, "Second line"
close #outfile
-----------------------------------------------------------
Sunaj