<div dir="ltr">Here is code that works for me. it does have to point to the HTTPS and since most of us dont have a signed Cert for there servers, you should use the "Ignore Cert error" constant as listed below. Replace the auth strings and CCM url, and your set.<br>
<br><br><br><%<br> Response.Buffer = True<br> Dim objXMLHTTP, xml<br>const SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS = 13056<br><br> ' Create an xmlhttp object:<br> 'Set xml = Server.CreateObject("Microsoft.XMLHTTP")<br>
' Or, for version 3.0 of XMLHTTP, use:<br> Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP.6.0")<br> xml.setOption 2, SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS<br> <br> ' Opens the connection to the remote server.<br>
soaprequest = "<SOAP-ENV:Envelope xmlns:SOAP-ENV='<a href="http://schemas.xmlsoap.org/soap/envelope/">http://schemas.xmlsoap.org/soap/envelope/</a>' xmlns:xsi='<a href="http://www.w3.org/2001/XMLSchema-instance">http://www.w3.org/2001/XMLSchema-instance</a>' xmlns:xsd='<a href="http://www.w3.org/2001/XMLSchema">http://www.w3.org/2001/XMLSchema</a>'><SOAP-ENV:Body><axl:listPhoneByName xsi:schemaLocation='<a href="http://www.cisco.com/AXL/1.0">http://www.cisco.com/AXL/1.0</a> <a href="http://ccmserver/schema/axlsoap.xsd">http://ccmserver/schema/axlsoap.xsd</a> ' sequence='1234' xmlns:axl='<a href="http://www.cisco.com/AXL/1.0">http://www.cisco.com/AXL/1.0</a>'><searchString>%</searchString></axl:listPhoneByName></SOAP-ENV:Body></SOAP-ENV:Envelope>"<br>
<br><br> xml.Open "POST", "<a href="https://CCMADDRESS:8443/axl/">https://CCMADDRESS:8443/axl/</a>", False, "username","password"<br><br> 'Add Proper Headers<br> xml.setRequestHeader "Authorization", "Basic Y2KJSDFLKJLKJLKJ#JLSJKDLJSKDBuZw=="<br>
xml.setRequestHeader "Content-type", "text/xml"<br> xml.setRequestHeader "POST", "8443/axl"<br> xml.setRequestHeader "Content-length", "478"<br> <br> ' Actually Sends the request and returns the data:<br>
xml.Send soaprequest<br><br> 'Display the HTML both as HTML and as text<br> <br><br> <br> // Response.Write xml.responseText<br><br>set xmlDoc=CreateObject("Microsoft.XMLDOM")<br>xmlDoc.async="false"<br>
xmlDoc.loadXML(xml.responseText)<br>Set objLst = xmlDoc.getElementsByTagName("name")<br><br><br><br>for each x in objLst<br>//Response.Write "<b>" & x.nodename & "</b>"<br>
Response.Write "<a href='<a href="http://mattdev.delta.test/examplegetIP.asp?name=">http://mattdev.delta.test/examplegetIP.asp?name=</a>" + x.text + "'>"<br>Response.Write x.text<br>Response.Write "</a><br>"<br>
next<br> <br> <br> Set xml = Nothing<br>%><br><br><br><br><div class="gmail_quote"><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;"><br>
</blockquote></div><br></div>