Вызов метода для работы с WSDL-документом
Option Explicit
Dim o,d,x
?создаем клиентский объект SOAP
Set o = CreateObject(«MSSOAP.SoapClient30»)
?инициализируем его с помощью простого WSDL
o.mssoapinit «http://op2/yukon/hello?wsdlsimple»
?вызываем метод hello_world
?возвращаемый объект реализует интерфейс IXMLDomNodeList
Set d = o.hello_world(«pal»)
?получаем объект IXMLDOMNode, который содержит результаты
?исполнения процедуры
Set x = d(1)
?подготавливаем документ для выполнения XPath запросов
x.ownerDocument.setProperty «SelectionLanguage», «XPath»
x.ownerDocument.setProperty «SelectionNamespaces», _
«xmlns:rs=?urn:schemas-microsoft-com:sql:SqlRowSet1?»
?делаем запрос для выбора интересующей нас части сообщения
?на экран выводится «Greetings, pal!»
MsgBox x.selectSingleNode(«//rs:row/rs:message»).text