vbCrLf in textarea

[dreaman74]

Carico in una textarea un testo dinamico creato con una procedura, es:

<form>
....
<textarea name="testo"><%call creaTesto()%></textarea>
...
</form>

Sub creaTesto()
response.write ("descrizione

" & vbCrLf & vbCrLf)
response.write ("riga2
" & vbCrLf)
response.write ("riga3
" & vbCrLf)
ecc
End Sub

NEL FORM APPARE QUESTO:
descrizione



riga2</br>
riga3</br>
Mi serve per facilitare la lettura del testo all'interno della textarea.

Quando vado a stampare a video la query:
descrizione

riga2
riga3
riga4

Devo salvare in un recordset la query
come posso sostituire il carriage return (vbCrLf) con un altro tag?

Ho provato a fare questo:
response.write repalce(request.form("TESTO"), "
", "< return >")
in questo modo succede questo:
descrizione

riga2 riga3 riga4
o provato un replace con CHR(13) e CHR(10)
Non succede nulla.

come posso mettere tutto in una stessa riga?
descrizione riga2 riga3 riga4

[Santino83_02]

replace(stringa, vbcrlf, "
") '  ovvero sostituisci a VbCrlf il tag 
 o quello cge vuyoi te

[dreaman74]

Ho risolto... alle volte sono proprio delle cavolate.
Basta staccare 10 min. e la soluzione viene da se.

FUNCTION formattaDescrizione(query)
    'pulisco la query 'DESCRIZIONE'
    descrizionePulita     = query
    descrizionePulita     = replace(descrizionePulita, CHR(13), "")
    descrizionePulita     = replace(descrizionePulita, CHR(10), "vbCrLf")
    formattaDescrizione = descrizionePulita
END FUNCTION