Ver Mensaje Individual
  #1 (permalink)  
Antiguo 09/09/2013, 17:26
fabyjk
 
Fecha de Ingreso: noviembre-2011
Mensajes: 4
Antigüedad: 13 años, 4 meses
Puntos: 0
Error leyendo xml

tengo una funcion que lee un xml con Microsoft.xmlhttp que se encuentra instalado tanto en mi servidor local como en el remoto donde alojo mis sitios.
El problema es que en mi servidor local se muestra el contenido perfecto pero en el remoto todos los campos los muestra vacíos, que puede ser?

Asi queda en el Local


Asi se ve en el remoto


Gracias.

a continuación les muestro el código:

Cita:
for i = 1 to vfinal

Dim url,vTitu,vEncabezado,vItem1,vItem2,vItem3,vItem4, vItem5,vItem6,vCierre

url= "http://localhost/intranet/totalcasa.com.ar/wwwroot/images/list"&i&".xml"

Dim objHTTP, strBuff, objXML, WScript
Set objHTTP = CreateObject("Microsoft.XMLHTTP")
objHTTP.Open "GET", url, False
objHTTP.Send

If objHTTP.Status = 200 Then strBuff = BinaryToString(objHTTP.ResponseBody)

Set objHTTP = Nothing

If Len(strBuff) > 0 Then
Set objXML = CreateObject("Microsoft.XMLDOM")
objXML.async = False
objXML.LoadXML(strBuff)
vTitu = trim(objXML.selectSingleNode("//titu").text)
vEncabezado = trim( objXML.selectSingleNode("//encabezado").text)
vItem1 = trim( objXML.selectSingleNode("//item1").text)
vItem2 = trim( objXML.selectSingleNode("//item2").text)
vItem3 = trim( objXML.selectSingleNode("//item3").text)
vItem4 = trim( objXML.selectSingleNode("//item4").text)
vItem5 = trim( objXML.selectSingleNode("//item5").text)
vItem6 = trim( objXML.selectSingleNode("//item6").text)
vCierre = trim( objXML.selectSingleNode("//cierre").text)
Set objXML = Nothing
End If

%>
<div class="portfolio">
<div class="tagline_left">
<h2><%= vTitu %></h2>
<p><%= vEncabezado %></p>
<ul id="list1">
<% if trim(vItem1)<>"" then %><li><%= vItem1 %></li><% end if %>
<% if trim(vItem2)<>"" then %><li><%= vItem2 %></li><% end if %>
<% if trim(vItem3)<>"" then %><li><%= vItem3 %></li><% end if %>
<% if trim(vItem4)<>"" then %><li><%= vItem4 %></li><% end if %>
<% if trim(vItem5)<>"" then %><li><%= vItem5 %></li><% end if %>
<% if trim(vItem6)<>"" then %><li><%= vItem6 %></li><% end if %>
</ul>
<p><%= vCierre %></p>
</div>

<div class="tagline_right"><img src="images/list<%=i%>.jpg"/></div>

<div class="clear"></div>
</div>
<%
next
%>

Última edición por fabyjk; 09/09/2013 a las 17:32 Razón: Agregar imagenes de referencia