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

Usar webservice

Estas en el tema de Usar webservice en el foro de ASP Clásico en Foros del Web. Hola, estoy intentando conectarme al webservice del Banco de Mexico http://www.banxico.org.mx/DgieWSWeb/...eCambioBanxico Con este codigo: @import url("http://static.forosdelweb.com/clientscript/vbulletin_css/geshi.css"); Código ASP: Ver original <%         ...
  #1 (permalink)  
Antiguo 27/11/2010, 22:24
Avatar de sjam7  
Fecha de Ingreso: diciembre-2001
Ubicación: Guadalajara, Mexico
Mensajes: 3.672
Antigüedad: 23 años
Puntos: 16
Exclamación Usar webservice

Hola, estoy intentando conectarme al webservice del Banco de Mexico
http://www.banxico.org.mx/DgieWSWeb/...eCambioBanxico

Con este codigo:
Código ASP:
Ver original
  1. <%
  2.             cadenaXML = "<env:Envelope  xmlns:soapenc=""http://schemas.xmlsoap.org/soap/encoding/"""
  3. cadenaXML = cadenaXML & "  xmlns:xsd=""http://www.w3.org/2001/XMLSchema"""
  4. cadenaXML = cadenaXML & "  xmlns:env=""http://schemas.xmlsoap.org/soap/envelope/"""
  5. cadenaXML = cadenaXML & "  xmlns:xsi=""http://www.w3.org/2001/XMLSchema-instance"">" & vbCrLf
  6. cadenaXML = cadenaXML & " <env:Header>" & vbCrLf
  7. cadenaXML = cadenaXML & " </env:Header>" & vbCrLf
  8. cadenaXML = cadenaXML & " <env:Body   env:encodingStyle=""http://schemas.xmlsoap.org/soap/encoding/"">" & vbCrLf
  9. cadenaXML = cadenaXML & "  <m:tiposDeCambioBanxico    xmlns:m=""http://ws.dgie.banxico.org.mx"">" & vbCrLf
  10. cadenaXML = cadenaXML & "  </m:tiposDeCambioBanxico>" & vbCrLf
  11. cadenaXML = cadenaXML & " </env:Body>" & vbCrLf
  12. cadenaXML = cadenaXML & "</env:Envelope>" & vbCrLf
  13.  
  14. Set objInputXMLDoc = Server.CreateObject("Microsoft.XMLDOM")
  15. response.write cadenaXML
  16.  
  17. objInputXMLDoc.loadXML cadenaXML
  18.  
  19. Set objXMLHTTP = Server.CreateObject("Microsoft.XMLHTTP")
  20. objXMLHTTP.open "post", "http://www.banxico.org.mx/DgieWSWeb/DgieWS?operation.invoke=tiposDeCambioBanxico", false
  21. objXMLHTTP.setRequestHeader "Content-Type", "text/xml"
  22. objXMLHTTP.setRequestHeader "soapAction", "http://www.banxico.org.mx:80/DgieWSWeb/DgieWS"
  23. objXMLHTTP.send objInputXMLDoc
  24.  
  25. response.write "<HTML><HEAD>" & vbCrLf
  26. response.write "</HEAD><BODY>" & vbCrLf
  27.  
  28. Set objOutputXMLDoc = Server.CreateObject("Microsoft.XMLDOM")
  29. objOutputXMLDoc.loadXML objXMLHTTP.responseText
  30.  
  31.     Set Nodes = objOutputXMLDoc.getElementsByTagName("bm:DataSet")
  32.     if Nodes.length > 0 then
  33.         response.write "HASTA QUE "&Nodes.length&"<br>"
  34.         For Each Node In Nodes
  35.             response.write Node.selectSingleNode("ID").Text & "<br>" & vbCrLf
  36.         Next
  37.     else
  38.         response.write "NI MAIZ "&Nodes.length&"<br>"
  39.         response.write objXMLHTTP.responseText
  40.     end if
  41.    
  42. %>

Pero no se, algo esta mal, no se que poner para que me lea el valor del dolar , ojala me puedan ayudar, gracias

Etiquetas: asp, webservice
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 06:06.