VPF::Excel SOAP client - Форум программистов

Tony

Дата 8.5.2008, 10:38 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1159
Регистрация: 3.3.2006
Где: Riga

Репутация: нет
Всего: 12

Привет всем. Я плохо знаю ВБА, поетому прошу совета. Нужно из Excel'a досту4аться для веб сервиса.
Клиент должен посылать такой SOAP konvert:

Код


<?xml version="1.0" encoding="utf-8"?>
<soap:Envelope
 xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"
 xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
 xmlns:xs="http://www.w3.org/2001/XMLSchema"
 xmlns:enc="http://schemas.xmlsoap.org/soap/encoding" 
>
<soap:Body>
<schema:PersonRequest xmlns:schema="http://www.averconsulting.com/echo/schemas">
<schema:name>killer</schema:name>
</schema:PersonRequest>
</soap:Body>
</soap:Envelope>

А обратно получать должен:

Код


<SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/">
<SOAP-ENV:Header/>
<SOAP-ENV:Body>
<schema:ReturnResponse xmlns:schema="http://www.averconsulting.com/echo/schemas">
<schema:message>killer</schema:message>
</schema:ReturnResponse>
</SOAP-ENV:Body>
</SOAP-ENV:Envelope>

Нашёл обэкт: SoapClient, написал:

Код


  Dim oSOAPClient As Object
   Set oSOAPClient = CreateObject("MSSOAP.SoapClient")
    oSOAPClient.mssoapinit "http://127.0.0.1:81/springws/echo.wsdl"
    Dim arrTemp As String 
   ' arrTemp = oSOAPClient.TvojMetod("sdfd");

Как вызвать и полу4ить обратно зна4ение message elementa.
4то посоветуете? Спасибо. smile

Это сообщение отредактировал(а) Akina - 8.5.2008, 11:24

--------------------

Akina

Дата 8.5.2008, 11:23 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454

А где код серверной части? Какие там есть методы?

M
Akina

Форматируйте код так, чтобы его можно было читать.

--------------------

О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

Tony

Дата 8.5.2008, 11:48 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1159
Регистрация: 3.3.2006
Где: Riga

Репутация: нет
Всего: 12

Северная 4асть на ява. Код приводить не буду. У меня есть клиент на ява они с сервисом работают 4ики пики. Выложу wsdl:

Код


<?xml version="1.0" encoding="UTF-8"?><wsdl:definitions xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/" xmlns:schema="http://www.averconsulting.com/ec/schemas" xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/" targetNamespace="http://www.averconsulting.com/ec/schemas">
  <wsdl:types>
    <xs:schema xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:ec="http://www.averconsulting.com/ec/schemas" elementFormDefault="qualified" targetNamespace="http://www.averconsulting.com/ec/schemas">
    <xs:element name="PersonRequest">    
        <xs:complexType>
            <xs:all>
                 <xs:element name="name" type="xs:string"/>
            </xs:all>
        </xs:complexType>
    </xs:element>

    <xs:element name="ReturnResponse">
        <xs:complexType>
            <xs:all>
                <xs:element name="message" type="xs:string"/>
            </xs:all>
        </xs:complexType>
    </xs:element>
</xs:schema>
  </wsdl:types>

  <wsdl:message name="ReturnResponse">
    <wsdl:part element="schema:ReturnResponse" name="ReturnResponse">
    </wsdl:part>
  </wsdl:message>
  <wsdl:message name="PersonRequest">
    <wsdl:part element="schema:PersonRequest" name="PersonRequest">
    </wsdl:part>
  </wsdl:message>
  <wsdl:portType name="Echo">

    <wsdl:operation name="Person">
      <wsdl:input message="schema:PersonRequest" name="PersonRequest">
    </wsdl:input>
    </wsdl:operation>
  </wsdl:portType>
  <wsdl:binding name="EchoBinding" type="schema:Echo">
    <soap:binding style="document" transport="http://schemas.xmlsoap.org/soap/http"/>
    <wsdl:operation name="Person">
      <soap:operation soapAction=""/>

      <wsdl:input name="PersonRequest">
        <soap:body use="literal"/>
      </wsdl:input>
    </wsdl:operation>
  </wsdl:binding>
  <wsdl:service name="EchoService">
    <wsdl:port binding="schema:EchoBinding" name="EchoPort">
      <soap:address location="http://127.0.0.1:81/springws/"/>
    </wsdl:port>

  </wsdl:service>
</wsdl:definitions>

--------------------

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB6 \| Следующая тема »