New to WSDL and need help

Hello all. I am embarking on a work project to try to make everyone in my office a little bit happier. Right now we need travel rates between 2 zip codes, we have to go to a website, enter a csv file with all details (origin, destination, date, etc.) and it will return the same csv file with a rate amended. The problem with this method is that it is not efficient for large volumes of inquiries.

I did some digging and discovered in the user manual that it is possible for users to develop an interface to the service. The manual includes a WSDL address, that I can't link to here for confidentiality reasons, and also gives the base XML behind most of the web methods.

Right now I am trying to get the simplest of the methods to work. The system
performs authentication for every service request received. This requires the service consumer to pass an authentication token within the SOAP Header. I am not sure how to use this, but here is the XML behind it.

[CODE]


licensekey
password
username




[/CODE]

The first thing that I am trying to get to work is a method named isReady that takes in no arguments and returns a boolean. This service is used to determine if the web service is accepting rating requests.

XML for the input:
[CODE]


string
string
string





[/CODE]

XML for the output:
[CODE]


boolean


[/CODE]

This is what i tried to use in Access's VBA.
[CODE]Public Sub GetXML()

Dim objSClient As MSSOAPLib.SoapClient
Dim oXML As MSXML2.DOMDocument40
Dim rst As New ADODB.Recordset
Dim str As New ADODB.Stream

Set objSClient = New SoapClient
Set oXML = New DOMDocument40
objSClient.mssoapinit "http://applications.***.com/AdminManager/services/**********?wsdl"
oXML.loadXML (objSClient.isReady())
str.Open
oXML.Save str
str.Position = 0
rst.Open str

Set oXML = Nothing
Set objSClient = Nothing
Set rst = Nothing
Set Stream = Nothing

End Sub[/CODE]

Whenever I try that, I end up with an error that says:
Run Time error '-2147467259 (80004005)':
Request must include a custom header and a AuthenticationToken.
Please see your user's guide for details:
?????? ??????


Can anyone out there please point me in the right direction?
Sign In or Register to comment.

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories