Campo Memo De Sql ,con Espacios En La Asp

[DARIOI]

COMO DESPLIEGO UN CAMPO MEMO DE UNA TABLA SQL
EN UNA TABLA ASP ,PERO FORMATEADA OSEA QUE RECONOSCA LOS SALTO DE LINEAS ,PUNTOS APARTES
Y NO SALGA COMO UNA LINEA CONTINUA DE TEXTO
A MERCED DE LO QUE DIGA EL TD DEL ASP

AGRADECIDO...

[cvander]

Si no estoy mal lo que buscas es esta función

<%= Replace(rsconsulta("Nombre_de_campo_en_bd&quo t;),CHR13,"<BR>") %>

<font size="1" color="#808080">"Tiempo atrás me pregunte si habían más webmasters hispanos en Internet. Vaya sorpresa la que he llevado."[/CODE]
- Christian Van Der Henst S.
Director General Maestros del Web

[illman]

Esto es para el retorno de carro, pero alguien sabe donde puedo encontrar el resto de carácteres como acentos, ... para aplicarles el mismo replace.
Muchas Gracias

[Mecenias]

Si es de tipo Memo, cuando lo muestres los acentos se mantienes y los puntos aparte no dejan de ser retorno de carro ¿no?

[XaRoD]

Imagino que el servidor que utilizas no está configurado en español , con lo cual un caracter como á é í ó ú no te los muestra bien.

Para ello tienes que ver el codigo HTML de dichos caracteres (si tienes un editor como el dreamweaver escribe en modo visual y edita el codigo fuente para verlo) y una vez sabidos los codigos te harias una función replace:

Function formateaTexto(texto)
'vocales con tilde
texto=Replace (texto,&quot;á&quot;,&quot;&amp;aacute;&quot;)
texto=Replace (texto,&quot;é&quot;,&quot;&amp;eacute;&quot;)
texto=Replace (texto,&quot;í&quot;,&quot;&amp;iacute;&quot;)
texto=Replace (texto,&quot;ó&quot;,&quot;&amp;oacute;&quot;)
texto=Replace (texto,&quot;ú&quot;,&quot;&amp;uacute;&quot;)
texto=Replace (texto,&quot;Á&quot;,&quot;&amp;Aacute;&quot;)
texto=Replace (texto,&quot;É&quot;,&quot;&amp;Eacute;&quot;)
texto=Replace (texto,&quot;Í&quot;,&quot;&amp;Iacute;&quot;)
texto=Replace (texto,&quot;Ó&quot;,&quot;&amp;Oacute;&quot;)
texto=Replace (texto,&quot;Ú&quot;,&quot;&amp;Uacute;&quot;)

'dieresis
texto=Replace (texto,&quot;ü&quot;,&quot;&amp;uuml;&quot;)
texto=Replace (texto,&quot;Ü&quot;,&quot;&amp;Uuml;&quot;)

'letra Ñ
texto=Replace (texto,&quot;ñ&quot;,&quot;&amp;ntilde;&quot;)
texto=Replace (texto,&quot;Ñ&quot;,&quot;&amp;Ntilde;&quot;)

'salto de linea
texto = Replace (texto,VbCrLf,&quot;&lt;br&gt;&quot;)

formateaTexto = texto
End Function

Despues recuperas tu campo memo y le aplicas la función:
campoMemo = formateaTexto(Recordset(&quot;campoMemo&quot;))

Espero que te sirva.

Salu2