maledetto a capo automatico

[Luis_Cypher]

qualkuno di buon cuore sa dirmi dove cavolo sbaglio???

<%
testo = replace(request.form("testobase"), vbCrLf,"
")
Dim objFSO, objTextFile
'Creazione dell'istanza FileSystem
Set objFSO = CreateObject("Scripting.FileSystemObject")
'Apertura del file di testo
'Utilizzare, a seconda della necessità, una delle due righe di codice
'Set objTextFile = objFSO.CreateTextFile("C:\InetPub\presentazione.tx t")
Set objTextFile = objFSO.CreateTextFile(Server.MapPath("../../presentazione.txt"))
'Scrivo la prima riga di codice
objTextFile.Writeline server.htmlencode(testo)
'Chiudo il file e i vari oggetti/istanze
objTextFile.Close
Set objTextFile = Nothing
Set objFSO = Nothing
%>

da questo script vorrei che mi creasse un file .txt che poi andrei ad includere in una tabella solo che invece di andare a capo........

mi restituisce

testo
di
prova

[Roby_72]

objTextFile.Writeline (testo)

Roby

[Luis_Cypher]

sei un grande


...... ma che sono cecato :-)