New SoapClient30 ------ "Automation error" - VB

Узнай цену своей работы

Формулировка задачи:

всё это делается в 2000 экселе в VBA.
при вызове этой комманды (Set sc_Excel = New SoapClient30) происходит эта ошибка (Automation error). SOAP ToolKit 3.0 установлен, ума не приложу, в чём дело???

Решение задачи: «New SoapClient30 ------ "Automation error"»

textual
Листинг программы
<font color="blue">Dim</font> soapclient1, soapGUIDES, soapPERSONS <font color="blue">As</font> SoapClient30
<font color="blue">Dim</font> languages <font color="blue">As</font> MSXML2.IXMLDOMSelection
<font color="blue">Dim</font> User <font color="blue">As</font> <font color="blue">String</font>, Password <font color="blue">As</font> <font color="blue">String</font>, GuidOfSession <font color="blue">As</font> <font color="blue">String</font>

User = <font color="teal">"ляляля"</font>
Password = <font color="teal">"тататата"</font>

<font color="#00AA00">'Веб-сервис для подключения сессии</font>
<font color="blue">Set</font> soapclient1 = CreateObject(<font color="teal">"MSSOAP.soapclient30"</font>)
soapclient1.ClientProperty(<font color="teal">"ServerHTTPRequest"</font>) = True
<font color="blue">Call</font> soapclient1.mssoapinit(<font color="teal">"http://10.44.1.1/EDBOCommon/EDBOCommon.asmx?WSDL"</font>)
GuidOfSession = soapclient1.Login(User, Password, <font color="darkblue"><b>1</b></font>) <font color="#00AA00">' идентификатор сессии</font>

MsgBox (<font color="teal">"id="</font> & GuidOfSession) <font color="#00AA00">'ТУТ ВСЕ РАБОТАЕТ ОТЛИЧНО, ИД СЕССИИ ПОЛУЧАЮ (метод описан как возвращающий String)</font>

<font color="#00AA00">'Веб-сервис общих справочников</font>
<font color="blue">Set</font> soapGUIDES = CreateObject(<font color="teal">"MSSOAP.SoapClient30"</font>)
soapGUIDES.ClientProperty(<font color="teal">"ServerHTTPRequest"</font>) = True
<font color="blue">Call</font> soapGUIDES.mssoapinit(<font color="teal">"http://10.44.1.1/EDBOGuides/EDBOGuides.asmx?WSDL"</font>)

<font color="blue">SET</font> languages = soapGUIDES.LanguagesGet(GuidOfSession) ' НА ЭТОЙ СТРОКЕ СТОПОРИТСЯ С ОШИБКОЙ <font color="blue">Object</font> required (метод описан, как возвращающий Array)  

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

7   голосов , оценка 3.857 из 5
Похожие ответы