I have been tasked with creating a web services call through a VB6 application. I've added the SOAP 3.0 Toolkit and have the code below.
I'm trying to hit the FedEx web service. I've tried changing the init to FedEx, and I get error messages.
"WSDLReader:XML Parser failed at linenumber 0, lineposition 0, reason is: System error: -2146697210.
HRESULT=0x1: Incorrect function.
- WSDLReader:Loading of the WSDL file failed HRESULT=0x80070057: The parameter is incorrect.
- Client:One of the parameters supplied is invalid. HRESULT=0x80070057: The parameter is incorrect."
I'm at a loss as to how I insert values into the call, I have the Request XML file and I know what I should be putting in there, but no idea how to actually send the correct information.
I've done web services development in .NET but that's not an option with this project.
Private Sub Command1_Click()
On Error GoTo error_Occured
Set client = CreateObject("MSSOAP.SoapClient30")
strg = (client.WelcomeMsg(Text1.Text))
If Err.Number = -2147024809 Then
MsgBox "Invalid Web Service Request. Please check the Web Service URL"