scrivere in file di testo

[Cream]

allora non mi ricordo e non riesco a trovare il FSO che scrive in un file di testo già esistente:

ho fatto questo ma sovrascrive il file:

 
Dim objFSO, objTextFile
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.CreateTextFile(server.MapPath("/writable/errori.txt"))
objTextFile.WriteLine "blabla"
objTextFile.Close
Set objTextFile = Nothing
Set objFSO = Nothing

io invece vorrei scrivere nel file errori.txt che già esiste e scrivere continuando ciò che c'è scritto

[willybit]

Ciao Cream,

se usi CreateTextFile crea sempre un nuovo file usa l'open

Dim objFSO, objTextFile
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile(Server.MapPath("/writable/errori.txt"),8,true)
objTextFile.WriteLine "blabla"
objTextFile.Close
Set objTextFile = Nothing
Set objFSO = Nothing

il secondo paramtetro (8) serve per indicare che apri il file per modifiche
1 Apre un file in sola lettura. Non è possibile scrivere nel file.
2 Apre un file in sola scrittura, ovvero non è possibile leggere il file.
8 Apre un file e scrive alla fine del file.
il terzo parametro (true) crea il file se non dovesse esistere