VB.NET Вызов веб-сервиса с ключом аутентификации - PullRequest
Новая
       24

VB.NET Вызов веб-сервиса с ключом аутентификации

1 голос
/ 24 сентября 2010

Я пытаюсь установить соединение с веб-сервисом из VB.NET. Я совершенно не знаю, как это сделать. Я получаю обзор того, что может сделать их мыло, и я также получил ключ безопасности. Однако я не уверен, как вызвать этот веб-сервис, используя ключ безопасности в VB.NET. Надеюсь, что кто-то может мне помочь, используя макет сервиса внизу.

Это раскладка мыла: 

POST /Webservice/Coachview.asmx HTTP/1.1
Host: training.coachview.net
Content-Type: text/xml; charset=utf-8
Content-Length: length
SOAPAction: "http://coachview.net/webservices/ToevoegenWebAanvraag"

<?xml version="1.0" encoding="utf-8"?>
<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
  <soap:Body>
    <ToevoegenWebAanvraag xmlns="http://coachview.net/webservices">
      <aWebserviceAuthentication>
        <Key>string</Key>
      </aWebserviceAuthentication>
      <aWebAanvraag>
        <OpleidingsSoortCode>string</OpleidingsSoortCode>
        <OpleidingsSoortNaam>string</OpleidingsSoortNaam>
        <OpleidingCode>string</OpleidingCode>
        <OpleidingNaam>string</OpleidingNaam>
        <AantalPersonen>short</AantalPersonen>
        <ReferentieNrKlant>string</ReferentieNrKlant>
        <Uitvoeringstermijn>string</Uitvoeringstermijn>
        <Oorsprong>string</Oorsprong>
        <Opmerking>string</Opmerking>
        <ContactPersoonIsDeelnemer>boolean</ContactPersoonIsDeelnemer>
        <AanvraagIsOrder>boolean</AanvraagIsOrder>
      </aWebAanvraag>
      <aWebAanvraagBedrijf>
        <Naam>string</Naam>
        <Adres>string</Adres>
        <Postcode>string</Postcode>
        <Plaats>string</Plaats>
        <Land>string</Land>
        <BezoekAdres>string</BezoekAdres>
        <BezoekPostcode>string</BezoekPostcode>
        <BezoekPlaats>string</BezoekPlaats>
        <BezoekLand>string</BezoekLand>
        <FactuurAdres>string</FactuurAdres>
        <FactuurPostcode>string</FactuurPostcode>
        <FactuurPlaats>string</FactuurPlaats>
        <FactuurLand>string</FactuurLand>
        <Emailadres>string</Emailadres>
        <Telefoonnummer>string</Telefoonnummer>
        <Faxnummer>string</Faxnummer>
        <Opmerking>string</Opmerking>
        <Website>string</Website>
        <ExternId>string</ExternId>
        <ExternSource>string</ExternSource>
      </aWebAanvraagBedrijf>
      <aContactPersoon>
        <Achternaam>string</Achternaam>
        <Voorletters>string</Voorletters>
        <Tussenvoegsels>string</Tussenvoegsels>
        <Voornaam>string</Voornaam>
        <Titel>string</Titel>
        <Geslacht>string</Geslacht>
        <Adres>string</Adres>
        <Postcode>string</Postcode>
        <Plaats>string</Plaats>
        <Land>string</Land>
        <Afdeling>string</Afdeling>
        <Functie>string</Functie>
        <Faxnummer>string</Faxnummer>
        <GeboorteDatum>string</GeboorteDatum>
        <GeboortePlaats>string</GeboortePlaats>
        <TelefoonMobiel>string</TelefoonMobiel>
        <TelefoonDirect>string</TelefoonDirect>
        <Emailadres>string</Emailadres>
        <Opmerking>string</Opmerking>
        <ExternId>string</ExternId>
        <ExternSource>string</ExternSource>
      </aContactPersoon>
      <theDeelnemers>
        <WebAanvraagPersoon>
          <Achternaam>string</Achternaam>
          <Voorletters>string</Voorletters>
          <Tussenvoegsels>string</Tussenvoegsels>
          <Voornaam>string</Voornaam>
          <Titel>string</Titel>
          <Geslacht>string</Geslacht>
          <Adres>string</Adres>
          <Postcode>string</Postcode>
          <Plaats>string</Plaats>
          <Land>string</Land>
          <Afdeling>string</Afdeling>
          <Functie>string</Functie>
          <Faxnummer>string</Faxnummer>
          <GeboorteDatum>string</GeboorteDatum>
          <GeboortePlaats>string</GeboortePlaats>
          <TelefoonMobiel>string</TelefoonMobiel>
          <TelefoonDirect>string</TelefoonDirect>
          <Emailadres>string</Emailadres>
          <Opmerking>string</Opmerking>
          <ExternId>string</ExternId>
          <ExternSource>string</ExternSource>
        </WebAanvraagPersoon>
        <WebAanvraagPersoon>
          <Achternaam>string</Achternaam>
          <Voorletters>string</Voorletters>
          <Tussenvoegsels>string</Tussenvoegsels>
          <Voornaam>string</Voornaam>
          <Titel>string</Titel>
          <Geslacht>string</Geslacht>
          <Adres>string</Adres>
          <Postcode>string</Postcode>
          <Plaats>string</Plaats>
          <Land>string</Land>
          <Afdeling>string</Afdeling>
          <Functie>string</Functie>
          <Faxnummer>string</Faxnummer>
          <GeboorteDatum>string</GeboorteDatum>
          <GeboortePlaats>string</GeboortePlaats>
          <TelefoonMobiel>string</TelefoonMobiel>
          <TelefoonDirect>string</TelefoonDirect>
          <Emailadres>string</Emailadres>
          <Opmerking>string</Opmerking>
          <ExternId>string</ExternId>
          <ExternSource>string</ExternSource>
        </WebAanvraagPersoon>
      </theDeelnemers>
    </ToevoegenWebAanvraag>
  </soap:Body>
</soap:Envelope>
HTTP/1.1 200 OK
Content-Type: text/xml; charset=utf-8
Content-Length: length

<?xml version="1.0" encoding="utf-8"?>
<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
  <soap:Body>
    <ToevoegenWebAanvraagResponse xmlns="http://coachview.net/webservices">
      <ToevoegenWebAanvraagResult>string</ToevoegenWebAanvraagResult>
    </ToevoegenWebAanvraagResponse>
  </soap:Body>
</soap:Envelope>

1 Ответ

0 голосов
/ 24 сентября 2010

Добавьте веб-ссылку в папку, где работает .asmx.Используйте веб-ссылку в том месте, где вы хотите что-то с этим сделать.

В моем случае мой код выглядел примерно так: 

//On top of my class
Imports net.coachview.training

//On the location where i needed it
Dim aWebserviceAuthentication As New WebserviceAuthentication
        aWebserviceAuthentication.Key = "xxx"
Dim aCoachviewnetWebservices As New CoachviewnetWebservices()

            inschrijvingNummer = aCoachviewnetWebservices.ToevoegenWebAanvraag(aWebserviceAuthentication, aWebAanvraag, aanvraagBedrijf, contactPersoon, colDeelnemers)

Где все типы просто используются из ссылки на веб-сервис.

...