Foros del Web » Programando para Internet » ASP Clásico »

Cargar datos de un xml, respetando saltos de línea

Estas en el tema de Cargar datos de un xml, respetando saltos de línea en el foro de ASP Clásico en Foros del Web. Hola! Tengo el siguient xml: Código: <noticia> <id> <![CDATA[ 36358 ]]> </id> <fecha> <![CDATA[ 20061102 ]]> </fecha> <hora> <![CDATA[ 164600 ]]> </hora> <titulo> <![CDATA[ Boca ...
  #1 (permalink)  
Antiguo 02/11/2006, 17:27
 
Fecha de Ingreso: mayo-2006
Mensajes: 243
Antigüedad: 18 años, 1 mes
Puntos: 0
Cargar datos de un xml, respetando saltos de línea

Hola!

Tengo el siguient xml:

Código:
<noticia>
  <id>
    <![CDATA[ 36358 ]]> 
  </id>
  <fecha>
    <![CDATA[ 20061102 ]]> 
  </fecha>
  <hora>
    <![CDATA[ 164600 ]]> 
  </hora>
  <titulo>
    <![CDATA[ Boca Juniors vs Arsenal ]]> 
  </titulo>
  <guia>
    <![CDATA[ FUTBOL-ARGENTINA ]]> 
  </guia>
  <texto>
    <![CDATA[ River perdió dos puntos de oro el domingo pasado cuando igualó con Independiente en Avellaneda y, según su centrocampista Víctor Zapata, "el equipo tiene que ganar los seis partidos que quedan por jugarse" para coronarse campeón.
	   
	   - Este es el programa de partidos de la 14a jornada:
	   Viernes : Argentinos Juniors-Banfield (00.10 gmt del sábado)
	   Sábado  : Racing-Rosario Central (21.20 gmt)
	             Vélez Sarsfield-Estudiantes (00.10 gmt del domingo)
	   Domingo : Newell's Old Boys-Independiente (17.00 gmt)
	             Quilmes-Belgrano (19.00 gmt)
	             Lanús-Godoy Cruz (17.00 gmt)
	             Gimnasia Jujuy-Colón (19.30 gmt)
	             Nueva Chicago-Gimnasia La Plata (19.30 gmt)
	             River Plate-San Lorenzo (19.10 gmt)
	             Arsenal-Boca Juniors (21.20 gmt).
	   
	   - Clasificación:
	   .1. Boca Juniors,                       29
	   .2. Estudiantes y River Plate,          28
	   .4. Arsenal,                            25
	   .5. Vélez Sarsfield,                    22
	   .6. Racing Club,                        21
	   .7. Independiente y San Lorenzo,        20
	   .9. Rosario Central,                    18
	   10. Lanús,                              17
	   11. Belgrano y Gimnasia La Plata,       16
	   13. Newell's Old Boys,                  15
	   14. Argentinos Juniors y Nueva Chicago, 14
	   16. Colón,                              12
	   17. Gimnasia de Jujuy y Godoy Cruz,     11
	   19. Banfield,                           10  ]]> 
  </texto>
</noticia>
Y tengo un asp en donde imprimo la información de ese xml, pero mi problema es que al momento de imprimir el contenido del nodo <texto>, no me respeta los saltos de línea, ni tabs lo pone todo seguido.
Mi pregunta es: ¿Hay alguna forma de trarme el contenido del nodo <texto>, así tal cual está, respetando enters, tabs, etc?

La forma en la que estoy imprimiendo el contenido es la siguiente:

Código:
<%
set xmlDocText=CreateObject("Microsoft.XMLDOM")
xmlDocText.async="false"
archivo = Server.MapPath("textoId.xml" )	
xmlDocText.load(archivo)
%>

<% If xmlDocText.parseError.errorCode <> 0 Then %>
  <%="A parse error occurred. " & xmlDocText.parseError.errorCode %>
  <%= xmlDocText.parseError.reason %>
  <%= xmlDocText.parseError.line %>
<% End If %>

<%
set xmltitulo = xmlDocText.getElementsByTagName("titulo")
TituloArt = xmltitulo.item(0).firstChild.nodeValue
set xmltexto = xmlDocText.getElementsByTagName("texto")
TextoArt = xmltexto.item(0).firstChild.nodeValue
%>

<body> ....

<table width="214" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td class="tt2"><br />
       <%=TextoArt%><br />&nbsp;
    </td>
  </tr>
</table>
  #2 (permalink)  
Antiguo 02/11/2006, 18:12
Avatar de u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 22 años, 5 meses
Puntos: 98
No estoy muy seguro, pero trata asi:

Código:
<%=Replace(TextoArt, vbCrLf, "<br />")%>
Saludos
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway
  #3 (permalink)  
Antiguo 02/11/2006, 18:22
 
Fecha de Ingreso: mayo-2006
Mensajes: 243
Antigüedad: 18 años, 1 mes
Puntos: 0
=( ... no funcionó ...
tambien ya probé con:

<%=Replace(TextoArt, chr(13), "<BR>")%>

pero igual, no funciona
  #4 (permalink)  
Antiguo 03/11/2006, 12:59
 
Fecha de Ingreso: mayo-2006
Mensajes: 243
Antigüedad: 18 años, 1 mes
Puntos: 0
Lo tengo... era muy simple...
primero hay que convertir TextoArt a string:

TextoArt = cstr(xmltexto.item(0).firstChild.nodeValue)

y después reemplazar:

TextoArt = Replace(TextoArt, chr(10), "<BR>")

Saludos!
Por fin es viernes!!!!!! :)
  #5 (permalink)  
Antiguo 03/11/2006, 13:32
Avatar de u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 22 años, 5 meses
Puntos: 98
Cita:
Por fin es viernes!!!!!! :)
Me gusta tu voz
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 19:34.