<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML xmlns="http://www.w3.org/TR/REC-html40" xmlns:m =
"http://schemas.microsoft.com/office/2004/12/omml" xmlns:o =
"urn:schemas-microsoft-com:office:office" xmlns:v =
"urn:schemas-microsoft-com:vml" xmlns:w =
"urn:schemas-microsoft-com:office:word"><HEAD>
<META http-equiv=Content-Type content="text/html; charset=us-ascii">
<META content="MSHTML 6.00.2900.3157" name=GENERATOR>
<STYLE>@font-face {
font-family: Calibri;
}
@page Section1 {size: 612.0pt 792.0pt; margin: 72.0pt 72.0pt 72.0pt 72.0pt; }
P.MsoNormal {
FONT-SIZE: 11pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: "Calibri","sans-serif"
}
LI.MsoNormal {
FONT-SIZE: 11pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: "Calibri","sans-serif"
}
DIV.MsoNormal {
FONT-SIZE: 11pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: "Calibri","sans-serif"
}
A:link {
COLOR: blue; TEXT-DECORATION: underline; mso-style-priority: 99
}
SPAN.MsoHyperlink {
COLOR: blue; TEXT-DECORATION: underline; mso-style-priority: 99
}
A:visited {
COLOR: purple; TEXT-DECORATION: underline; mso-style-priority: 99
}
SPAN.MsoHyperlinkFollowed {
COLOR: purple; TEXT-DECORATION: underline; mso-style-priority: 99
}
SPAN.EmailStyle17 {
COLOR: windowtext; FONT-FAMILY: "Calibri","sans-serif"; mso-style-type: personal-compose
}
.MsoChpDefault {
mso-style-type: export-only
}
DIV.Section1 {
page: Section1
}
</STYLE>
<!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]--></HEAD>
<BODY>
<DIV dir=ltr align=left><SPAN class=505405310-04082008><FONT face=Arial
color=#0000ff size=2>If memory serves SOAP/AXL on 4.2 and higher requires using
https and you need do have the CUCM certificate on the machine doing the
transaction.</FONT></SPAN></DIV>
<DIV dir=ltr align=left><SPAN class=505405310-04082008><FONT face=Arial
color=#0000ff size=2></FONT></SPAN> </DIV>
<DIV dir=ltr align=left><SPAN class=505405310-04082008><FONT face=Arial
color=#0000ff size=2>This means your authorization method settings need to be
changed.</FONT></SPAN></DIV>
<DIV dir=ltr align=left><SPAN class=505405310-04082008><FONT face=Arial
color=#0000ff size=2></FONT></SPAN> </DIV>
<DIV dir=ltr align=left><SPAN class=505405310-04082008><FONT face=Arial
color=#0000ff size=2>I've attached some Java code I wrote a few years ago that
should help.</FONT></SPAN></DIV><BR>
<DIV class=OutlookMessageHeader lang=en-us dir=ltr align=left>
<HR tabIndex=-1>
<FONT face=Tahoma size=2><B>From:</B> cisco-voip-bounces@puck.nether.net
[mailto:cisco-voip-bounces@puck.nether.net] <B>On Behalf Of </B>Granger,
Simon<BR><B>Sent:</B> Monday, August 04, 2008 5:39 AM<BR><B>To:</B>
cisco-voip@puck.nether.net<BR><B>Subject:</B> [cisco-voip] AXL VB
Examples<BR></FONT><BR></DIV>
<DIV></DIV>
<DIV>
<DIV class=Section1>
<P class=MsoNormal>Hello all,<o:p></o:p></P>
<P class=MsoNormal><o:p> </o:p></P>
<P class=MsoNormal>I was wondering if anyone had any VB examples of AXL coding
they can send me. <o:p></o:p></P>
<P class=MsoNormal>I have seen that there has been talk on the site before, but
am struggling to get anything to work..<o:p></o:p></P>
<P class=MsoNormal><o:p> </o:p></P>
<P class=MsoNormal>This is what I have so far but cannot get it to work at
all.<o:p></o:p></P>
<P class=MsoNormal><o:p> </o:p></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">'Build the SOAP
payload<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlsoap = "<SOAP-ENV:Envelope xmlns:SOAP-ENV=" & chr(34) &
"http://schemas.xmlsoap.org/soap/envelope/" & chr(34)<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlsoap = xmlsoap & "xmlns:xsi=" & chr(34) &
"http://www.w3.org/2001/XMLSchema-instance" & chr(34) <o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlsoap = xmlsoap & "xmlns:xsd=" & chr(34) &
"http://www.w3.org/2001/XMLSchema" & chr(34) & ">" &
vbcrlf<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlsoap = xmlsoap & "<SOAP-ENV:Body>" &
vbcrlf<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlsoap = xmlsoap & "<axl:getPhone xmlns:axl=" & chr(34) &
"http://www.cisco.com/AXL/1.0" & chr(34) & " "<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlsoap = xmlsoap & "xsi:schemaLocation=" & chr(34) &
"http://www.cisco.com/AXL/1.0 http://10.216.4.11/schema/axlsoap.xsd" &
chr(34) & "sequence=" & chr(34) & "1234" & chr(34) &
">"<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlsoap = xmlsoap &
"<phoneName>SEP222222222245</phoneName>"<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlsoap = xmlsoap & "</axl:getPhone>" &
vbcrlf<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlsoap = xmlsoap & "</SOAP-ENV:Body>" &
vbcrlf<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlsoap = xmlsoap & "</SOAP-ENV:Envelope>"<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
msgbox xmlsoap<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
dim xmlhttp <o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
set xmlhttp = server.Createobject("MSXML2.ServerXMLHTTP")<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
'replace localhost with the server you would like to post
to<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
const SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS = 13056<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlhttp.setOption 2,
SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlhttp.Open "POST","http://10.216.4.11:8443/axl/",false<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlhttp.setRequestHeader "Authorization", "Basic " &
Base64Encode("CCMAdmin:ca11manager")<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlhttp.setRequestHeader "Content-type", "text/xml"<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlhttp.setRequestHeader "POST",
"8443/axl"<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlhttp.setRequestHeader "Content-length", len(xmlsoap)
//<-- length in characters<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlhttp.send xmlsoap<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 8pt; FONT-FAMILY: 'Courier New'">
xmlhttp.responsexml.xml<o:p></o:p></SPAN></P>
<P class=MsoNormal><o:p> </o:p></P>
<P class=MsoNormal>Thanks<o:p></o:p></P>
<P class=MsoNormal><o:p> </o:p></P>
<P class=MsoNormal><o:p> </o:p></P></DIV></DIV>
<DIV> </DIV>
<DIV>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><SPAN lang=EN-GB
style="FONT-SIZE: 10pt; COLOR: black; FONT-FAMILY: Arial"><FONT
color=gray>Registered No. 755780 England</FONT></SPAN></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><SPAN lang=EN-GB
style="FONT-SIZE: 10pt; COLOR: black; FONT-FAMILY: Arial"><FONT
color=gray>Registered Office: FM Insurance Company Limited</FONT></SPAN></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><SPAN lang=EN-GB
style="FONT-SIZE: 10pt; COLOR: black; FONT-FAMILY: Arial"><FONT color=gray>1
Windsor Dials, Windsor,</FONT></SPAN></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><SPAN lang=EN-GB
style="FONT-SIZE: 10pt; COLOR: black; FONT-FAMILY: Arial"></SPAN><SPAN
lang=EN-GB style="FONT-SIZE: 10pt; COLOR: black; FONT-FAMILY: Arial"><FONT
color=gray>Berkshire, UK, SL4 1RS</FONT></SPAN></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><SPAN lang=EN-GB
style="FONT-SIZE: 10pt; COLOR: black; FONT-FAMILY: Arial"><FONT
color=gray>Regulated by the Financial Services Authority.</FONT></SPAN></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><SPAN lang=EN-GB
style="FONT-SIZE: 10pt; COLOR: black; FONT-FAMILY: Arial"><FONT color=gray>VAT
No. G.B.: 792 4276 02</FONT></SPAN></P></DIV></BODY></HTML>