F
Francois Houde
This code works fine in Excel 2007 but not in Excel 2000. I have the soap
toolkit installed.
I have tried changing ReturnValue for an Object but it doesn't work either.
Any Idea on how can I make this work ?
The Web service don't have parameters and only return a string.
Here's the function
Public Sub CallWebService()
On Error GoTo CallWebService_error
Dim adress As String
Dim ReturnValue As String
Dim soap As SoapClient30
Set soap = New SoapClient30
adress = "http://test.org/Service.asmx?WSDL"
soap.MSSoapInit adress
ReturnValue = soap.GetExcelInfo()
Set soap = Nothing
Exit Sub
CallWebService_error:
Debug.Print Err.Number
Debug.Print Err.Description
End Sub
Thanks In Advance
François Houde
toolkit installed.
I have tried changing ReturnValue for an Object but it doesn't work either.
Any Idea on how can I make this work ?
The Web service don't have parameters and only return a string.
Here's the function
Public Sub CallWebService()
On Error GoTo CallWebService_error
Dim adress As String
Dim ReturnValue As String
Dim soap As SoapClient30
Set soap = New SoapClient30
adress = "http://test.org/Service.asmx?WSDL"
soap.MSSoapInit adress
ReturnValue = soap.GetExcelInfo()
Set soap = Nothing
Exit Sub
CallWebService_error:
Debug.Print Err.Number
Debug.Print Err.Description
End Sub
Thanks In Advance
François Houde