webservice under VB6

Hi,

I have a webservice that is embedded in a device.

I can access to the device through ftp with no problem with a login and password.


I try to use the webservice that is present on the device using VB6.

I am using the SOAP toolkit 3.0 of Microsoft for that and do the following.

Code:

---

Private Sub Command1_Click()
Dim sclient As SoapClient30
Dim ret As String
On Error GoTo errFct
    MousePointer = vbHourglass
    Set sclient = New SoapClient30
   
    sclient.mssoapinit2 "http://121.145.5.132/WSDL/v1.1/iLON100.wsdl", "", "iLON100", "MainSoapPort", ""
    sclient.ConnectorProperty("AuthUser") = "user" 'user login
    sclient.ConnectorProperty("AuthPassword") = "password" 'password login
    sclient.ConnectorProperty("EndPointURL") = "http://121.145.5.132/WSDL/v1.1/iLON100.wsdl"
   
    ret = sclient.TheWebServiceFunction("")
    MousePointer = vbNormal
    Exit Sub
errFct:
    MousePointer = vbNormal
    MsgBox Err.Description & " : " & Err.Number
    Resume errFct1
errFct1:
End Sub

---

And I have each time an error that is raised telling "Client:An unanticipated error occurred during the processing of this request. HRESULT=0x800A13ED - Client:Sending the Soap message failed or no recognizable response was received HRESULT=0x800A13ED - Client:Unspecified client error. HRESULT=0x800A13E"

I have tried without the login/password and got the same I have turned it in many senses and really do not find why.
Please can anyone help me on that.

Any ideas will be greatly appreciate.

Thanks a lot!