![]() |
|
![]() ![]() ![]() |
|
Надежда |
|
|||
Unregistered |
Здравствуйте, All!
Нужно реализовать на ASP запросы к некоторому сервису, поддерживающему SOAP. Всего несколько функций. Увидела пример где-то в инете, что-то типа Dim objHTTP set objHTTP = New MSXML.XMLHTTPRequest ![]() Dim strEnvelope Dim strReturn Dim objReturn objReturn= New MSXML.DOMDocument Dim dblTax Dim strQuery 'Create the SOAP Envelope strEnvelope = _ "<SOAP:Envelope xmlns:SOAP=""http://schemas.xmlsoap.org/soap/envelope/"" soap:encodingStyle=""http://myHost.com/encodings/secureEncoding"">" & _ "<SOAP:Header></SOAP:Header>" & _ "<SOAP:Body>" & _ "<m:NewDialog xmlns:m=""Some URI"">" & _ "<par1>90</par1>" & _ "<dialidn>1</dialidn>" & _ "</m:NewDialog>" & _ "</SOAP:Body>" & _ "</SOAP:Envelope>" 'Set up to post to our local server objHTTP.open "post", "MY SOAP SERVER", False response.write(strReturn&"*3_"&objReturn&"_") 'Set a standard SOAP/ XML header for the content-type objHTTP.setRequestHeader "Content-Type", "text/xml" response.write(strReturn&"*2_"&objReturn&"_") 'Set a header for the method to be called objHTTP.setRequestHeader "SOAPMethodName", "urn:SOME URI:NLC#NewDialog" response.write(strReturn&"*1_"&objReturn&"_") 'Make the SOAP call objHTTP.send strEnvelope response.write(strReturn&"0_"&objReturn&"_") 'Get the return envelope strReturn = objHTTP.responseText response.write(strReturn&"1_"&objReturn&"_") и т.д. но при созданни же объекта возникает ошибка Microsoft VBScript runtime error '800a01fa' Class not defined: 'MSXML' ПОЧЕМУ? Возможно кто-нибудь знает как мне лучше прикрутить SOAP запросы к ASP? |
|||
|
||||
![]() ![]() ![]() |
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | ASP | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |