Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Google search api webservice
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Web Services
Versions des environnements
Visual FoxPro:
VFP 9
Divers
Thread ID:
01042495
Message ID:
01042601
Vues:
28
Sergey,

Wow, that works great. Now I haved to figure out how it works..

Thanks a lot.



>The Google web service expects parameter types included but MSSOAP doesn't provide them. You can use Rick's free wwSOAP class from http://west-wind.com/wwsoap.asp. Here's a sample code
>SET CLASSLIB TO wwXML Additive
>SET PROCEDURE TO wwUtils additive
>SET PROCEDURE TO wwHTTP Additive
>
>lcGoogleKey = [...]
>lcQuery	= "FoxPro"
>
>lnStart= "0"
>lnEnd= 10
>llFilter= 0
>lcRestrict= ""
>llAdultfilter = 0
>lcLanguage= ""
>lcInputChar= ""
>lcOutputChar= ""
>
>lcWsdl = "http://api.google.com/GoogleSearch.wsdl"
>
>loSOAP = NEWOBJECT("wwSOAP", "wwsoap.fxp")
>
>loSDL = loSOAP.ParseServiceWSDL(lcWsdl)
>IF ISNULL(loSDL)
>   MESSAGEBOX(loSOAP.cErrorMsg)
>   RETURN .F.
>ENDIF
>
>loGS = loSDL.getmethod("doGoogleSearch")
>
>loSoap.cServerUrl = TRIM(loSDL.cServerUrl)
>loSoap.lIncludeDataTypes = .T.
>
>loSOAP.cSoapAction = loGS.cSoapAction
>loSOAP.cMethodNameSpaceUri = TRIM(loGS.cMethodNameSpaceUri)
>IF NOT EMPTY(loSOAP.cMethodNamespaceuri)
>   loSOAP.cMethodNameSpace = "m"
>ENDIF
>
>loSoap.AddParameter("k", lcGoogleKey, "string")
>loSoap.AddParameter("q", lcQuery, "string")
>loSoap.AddParameter("start", lnStart, "int")
>loSoap.AddParameter("maxResults", lnEnd, "int")
>loSoap.AddParameter("filter", llFilter, "boolean")
>loSoap.AddParameter("restrict", lcRestrict, "string")
>loSoap.AddParameter("safeSearch", llAdultfilter, "boolean")
>loSoap.AddParameter("lr", lcLanguage, "string")
>loSoap.AddParameter("ie", lcInputChar, "string")
>loSoap.AddParameter("oe", lcOutputChar, "string")
>
>loSoap.lParseReturnedObjects = .F.
>
>lvResult = loSoap.CallMethod(loGS.cName)
>
>IF loSoap.lError
>   MESSAGEBOX("Error occurred: " + CHR(10) + loSOAP.cErrorMsg)
>   RETURN .F.
>ENDIF
>
>? lvResult.text
>
>RETURN
>
>
>
>>
>>I'm experimenting with the google search api webservice using foxpro. I get the following error :
>>
>>**error :OLE IDispatch exception code 0 from SOAP-ENV:Client: No Deserializer found to deserialize a ':key' using encoding style 'http://schemas.xmlsoap.org/soap/encoding/'...
>>
>>Does someone knows what this error means and can help me resolve it.
>>
>>This is my code:
><snip>
Zakaria al Azhar
My blog on Actuaris.net
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform