Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Unable to Connect to Web Service
Message
From
14/02/2005 08:12:13
 
 
To
14/02/2005 06:41:56
General information
Forum:
Visual FoxPro
Category:
Web Services
Miscellaneous
Thread ID:
00986007
Message ID:
00986584
Views:
46
Sue,

Sorry to hear you are still getting issues. I can get the Airport Weather web service to work fine in VFP8 so long as I turn off my Proxy (enclosed my code).
So have you tried adding your proxy settings to the class?
MODIFY CLASS wshandler of _ws3client.vcx
Find SetConnectorProperties and add your proxy settings.

asmx?wsdl wouldn't make a different as the asmx part is just .net's own Web service type whilst wsdl is the standard that FoxPro, Java etc. uses.

Geraint


LOCAL loStation AS "XML Web Service"
* LOCAL loStation AS "MSSOAP.SoapClient30"
* Do not remove or alter following line. It is used to support IntelliSense for your XML Web service.
*__VFPWSDef__: loStation = http://live.capescience.com/wsdl/AirportWeather.wsdl , AirportWeather , Station
LOCAL loException, lcErrorMsg, loWSHandler
TRY
loWSHandler = NEWOBJECT("WSHandler",IIF(VERSION(2)=0,"",HOME()+"FFC\")+"_ws3client.vcx")
loStation = loWSHandler.SetupClient("http://live.capescience.com/wsdl/AirportWeather.wsdl", "AirportWeather", "Station")
* Call your XML Web service here. ex: leResult = loStation.SomeMethod()

loSummary = loStation .getSummary("KSEA")

lcText = loSummary.Item(2).Text


MESSAGEBOX(lcText, "KSEA Weather Conditions")


CATCH TO loException
lcErrorMsg="Error: "+TRANSFORM(loException.Errorno)+" - "+loException.Message
DO CASE
CASE VARTYPE(loStation)#"O"
* Handle SOAP error connecting to web service
CASE !EMPTY(loStation.FaultCode)
* Handle SOAP error calling method
lcErrorMsg=lcErrorMsg+CHR(13)+loStation.Detail
OTHERWISE
* Handle other error
ENDCASE
* Use for debugging purposes
MESSAGEBOX(lcErrorMsg)
FINALLY
ENDTRY
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform