Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Unable to Connect to Web Service
Message
De
14/02/2005 08:12:13
 
 
À
14/02/2005 06:41:56
Information générale
Forum:
Visual FoxPro
Catégorie:
Web Services
Divers
Thread ID:
00986007
Message ID:
00986584
Vues:
45
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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform