Ver Mensaje Individual
  #6 (permalink)  
Antiguo 15/12/2004, 12:10
ponjos
 
Fecha de Ingreso: noviembre-2002
Mensajes: 24
Antigüedad: 21 años, 6 meses
Puntos: 0
Este es una manera de leer un xml.
fichero.asp
Código:
Response.Write ("<html><head><title>Ejemplo fichero XML (RSS)</title>")
Response.Write ("</head><body>")
Dim objHTTP
Dim url
url= "http://www.forosdelweb.com/index.xml"
Set objHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP.4.0")
objHTTP.Open "POST", url, false
objHTTP.send()

Response.Write ("<h2>" & objHTTP.responseXml.SelectSingleNode("rss/channel/title").Text & "</h2>")
Response.Write ("<h3>" &  objHTTP.responseXml.SelectSingleNode("rss/channel/description").Text & "</h3>
For Each objItem in objHTTP.responseXML.SelectNodes("rss/channel/item")
Response.Write ("<p>")
 Response.Write ("<h5>" & objItem.SelectSingleNode("title").text & "</h5>")
 Response.Write (objItem.SelectSingleNode("description").text & "<br />")
 Response.Write ("<a href=""" & objItem.SelectSingleNode("link").Text & """>más...</a>")
 Response.Write ("</p>")
Next
Set objHTTP = Nothing
Response.Write ("</body></html>")
En este caso leemos el fichero xml (rss) de este mismo foro (con sus propios nodos). En la variable URL poner lo que corresponda.
Para grabar los datos en vez de visualizarlos: en el bucle for se haría un insert a la base de datos.

Respecto a luisvasquez:
creo que en el método send se pueden porner los datos que se envian al otro servidor. No he probado nada sobre esto.

Epero que os sirva. Un saludo.