6
का उपयोग कर क्लासिक एएसपी से नेट नेट सेवा विधि को कॉल करने के लिए कैसे मैं एसओएपी का उपयोग कर क्लासिक एएसपी से नेट नेट सेवा को कॉल करने का प्रयास कर रहा हूं। मैंने निम्न कोड को एक परीक्षण के रूप में बनाया है और 400 खराब अनुरोध त्रुटि के साथ एक खाली reponsebody वापस प्राप्त करना जारी रखें। क्या मैं कुछ गलत कर रहा हूं या शायद यह मुद्दा नेट पर हो सकता है?एसओएपी
'set up xmlhttp to checkout server
Dim oRequest
Set oRequest = Server.CreateObject("MSXML2.ServerXMLHTTP")
'setting this option will allow ServerXMLHTTP to ignore the certificate errors it encounters.
oRequest.setOption(2) = SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS
' resolve, connect, send, receive - in milliseconds
oRequest.setTimeouts 10000, 10000, 10000, 10000
'set the URL
msURL = "[redacted]"
msSOAP = "<?xml version=""1.0"" encoding=""utf-8"" ?>"
msSOAP = msSOAP & "<soap12:Envelope xmlns:xsi=""http://www.w3.org/2001/XMLSchema-instance"" xmlns:xsd=""http://www.w3.org/2001/XMLSchema"" xmlns:soap12=""http://www.w3.org/2003/05/soap-envelope"">"
msSOAP = msSOAP & "<SOAP:Body>"
msSOAP = msSOAP & "<[Some Service] xmlns=""http://localhost"">"
msSOAP = msSOAP & "<MethodName>"
msSOAP = msSOAP & "<methodParam1>[some value]</methodParam1>"
msSOAP = msSOAP & "<methodParam2>[some value]</methodParam2>"
msSOAP = msSOAP & "<methodParam3>[some value]</methodParam3>"
msSOAP = msSOAP & "</MethodName>"
msSOAP = msSOAP & "</[Some Service]>"
msSOAP = msSOAP & "</SOAP:Body>"
msSOAP = msSOAP & "</soap12:Envelope>"
oRequest.Open "POST", msURL, False
oRequest.setRequestHeader "Content-Type", "text/xml"
oRequest.setRequestHeader "SOAPMethodName", "[MethodName]"
oRequest.setRequestHeader "SOAPAction", "[Some Url]"
oRequest.send msSOAP
Response.Write oRequest.ResponseBody
ओह। मैं साबुन 12 टैग के साथ खराब स्वरूपित एक्सएमएल देखता हूं जो एसओएपी एंड टैग से मेल नहीं खाता है। लेकिन, इससे कोई फर्क नहीं पड़ता। यह मेरे कोड के वास्तविक संस्करण में कोई अच्छा नतीजा नहीं है। – crackedcornjimmy
किस प्रकार (और प्रारूप) '