scrivere in append

[moribura]

Ciao,

come faccio a scriver eun file in append?
<%
Dim ilcliente, lalingua, referer, query, numMaxLine
Dim filepath, logfile, counter, filePathOld, data, strOspite
data = Replace(Date(),"/","")
numMaxLine = 1000

ilcliente = Request.ServerVariables("REMOTE_ADDR")
lalingua = Request.ServerVariables("HTTP_ACCEPT_LANGUAGE")
referer = Request.ServerVariables("HTTP_REFERER")
query = Request.ServerVariables("QUERY_STRING")

filePath = Server.MapPath("/public/ospite.txt")
testo = referer

'Creazione dell'istanza FileSystem
Set objFSO = CreateObject("Scripting.FileSystemObject")

Set objTextFile = objFSO.CreateTextFile(filePath)

'Scrivo la prima riga di codice
objTextFile.WriteLine testo

'Chiudo il file e i vari oggetti/istanze
objTextFile.Close
Set objTextFile = Nothing
Set objFSO = Nothing
%>

grazie

[Lak3d]

http://www.w3schools.com/asp/met_opentextfile.asp

dopo il nome del file metti 8

[moribura]

l'avevo fatto ma non funzionava...

ora riprovo..

Grazie