Hola
Para ello has de usar la función Replace
Te pongo un ejemplo con ASP
Código asp:
Ver originalPublic Function Linea(strInput)
Dim strTemp
strTemp = Server.HTMLEncode(strInput)
strTemp = Replace(strTemp, vbCrLf, "<br />" & vbCrLf, 1, -1, 1)
Linea = strTemp
End Function
Suerte