ASP - Salto de linea en foro

Hola,
estoy haciendo una aplicación de foros y me interesa conservar los saltos de linea cuando se muestran los mensajes, como estos:
1
2
3
¿Alguien lo ha hecho alguna vez?

un saludo.

Tienes que hacer un replace de los caracteres enter por un <BR>.

cadena=replace(cadena,chr(13),\"<br>\")

te quedaria mejor asi
CADENA = CStr(Replace(CADENA,str,\"<br>\"))
CADENA = CStr(Replace(CADENA,vbCr,\"<br>\"))