Const forAppend = 3
Dim fs, f
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.OpenTextFile(Server.MapPath("fil.txt"), forAppend,TristateFalse)
f.Write strNamn & " " & strOrt
f.Close
Const forAppend = 8
Dim fs, f
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.OpenTextFile(Server.MapPath("fil.txt"), forAppend)
f.Write strNamn & " " & strOrt
f.Close
(Jag tog exemplet direkt fråm MSDN. Dokumentatören har tydligen slarvat. ;))