Ver Mensaje Individual
  #3 (permalink)  
Antiguo 10/02/2010, 10:44
Avatar de Fanathur
Fanathur
 
Fecha de Ingreso: noviembre-2009
Mensajes: 3
Antigüedad: 15 años
Puntos: 0
Respuesta: Invocar función dentro de un servicio web desde ASP

Gracias por el código. Lo he probado pero me da un error que no logro entender (el porqué). El proveedor es la Agencia de Protección de Datos, y el archivo XML es uno de prueba enviado por ellos. El código es el siguiente:

strURL = "https://www.aespd.es:443/agenciapd/axis/SolicitudService?wsdl"
SoapServer = "www.aespd.es"
SoapPath = "/agenciapd/axis/SolicitudService?wsdl"

Set oSOAPprov = CreateObject("MSXML2.ServerXMLHTTP")
oSOAPprov.Open "POST", strURL, False

oSOAPprov.setRequestHeader "Man", "POST " & strURL & " HTTP/1.1"
oSOAPprov.setRequestHeader "Host", SoapServer
oSOAPprov.setRequestHeader "Content-Type", "text/xml; charset=utf-8"
oSOAPprov.setRequestHeader "SOAPAction", "https://www.aespd.es:443/agenciapd/axis/SolicitudService"
oSOAPprov.send (parser.XML)

El resultado dice que está mal la etiqueta envio:
<?xml version="1.0" encoding="UTF-8"?>
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
<soapenv:Body>
<soapenv:Fault>
<faultcode>soapenv:Server.userException</faultcode>
<faultstring>org.xml.sax.SAXException: Bad envelope tag: envio</faultstring>
<detail/>
</soapenv:Fault>
</soapenv:Body>
</soapenv:Envelope>

¿Me puedes ayudar? Gracias.