ayuda con replace(texto, newline, "<br>")

[alexvb]

hola, pues precisamente es esto lo q necesito hacer

tengo un registro en la base de datos q tiene caracteres de linea nueva al mostrar se eliminan obviamente he tratado re preservarlos con funciones como:

replace(texto, newline, "<br>")
replace(texto, vbcrlf, "<br>")
replace(texto, chr(13), "<br>")
replace(texto, en verdad varias maneras, "<br>")

y bueno aunque he buscado en algunas entradas del google no encuentro algo q solucione mi problema, quisas alguien aqui ha lidiado con lo mismo...
gracias....

[Adler]

Hola

Prueba con esto

Código ASP:

Public Function Lineify(strInput)
Dim strTemp
    strTemp = Server.HTMLEncode(strInput)
    strTemp = Replace(strTemp, vbCrLf, "<br />" & vbCrLf, 1, -1, 1) 
    Lineify = strTemp
End Function
 

Uso

Código ASP:

Response.Write Lineify(str)
 

Suerte