ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

Comment trouver une adresse physique à partir de coordonnés GPS et Google Maps   



L'auteur

Mike Gagnon
Canada Canada
Membre Simple
# 0000000025
enregistré le 14/10/2004

Gagnon Mike
Pte Claire Quebec - Canada
de la société MCRG Software
Fiche personnelle


Note des membres
pas de note

Contributions > 09 - Automation

Comment trouver une adresse physique à partir de coordonnés GPS et Google Maps
# 0000000719
ajouté le 07/09/2009 14:42:45 et modifié le 12/09/2013
consulté 6319 fois
Niveau initié

Version(s) Foxpro :
VFP 9.0
VFP 8.0
VFP 7.0
VFP 6.0
VFP 5.0

Description
Voici la fonction inverse de la fonction trouvée ici : http://www.atoutfox.org/articles.asp?ACTION=FCONSULTER&ID=0000000715 La technique se nomme (en Anglais) Reverse Geocoging. N.B. La science de Reverse Geocoding n'est très précise. Mais utile. Le résultat de cette fonction donne un fichier XML avec beaucoup d'information. À vous d'extraire l'information à vos besoins.
Code source :
clear
local lat,long,lcAddress
m.Lat = '40.714224'
m.Lng = '-73.961452'
xhrRequest= Createobject("Msxml2.ServerXMLHTTP")
sQuery = "http://maps.googleapis.com/maps/api/geocode/xml?sensor=false&latlng="+m.Lat+","+m.lng
xhrRequest.Open ("GET", sQuery, .f.)
xhrRequest.send()
oXML=CREATEOBJECT('msxml.domdocument')
oXML.LoadXml(xhrRequest.responseText)
m.lcAddress= oXML.selectSingleNode("/GeocodeResponse/result/formatted_address")
?m.lcAddress.text

Commentaires
Aucun commentaire enregistré ...

Publicité

Les pubs en cours :

www.atoutfox.org - Site de la Communauté Francophone des Professionnels FoxPro - v3.4.0 - © 2004-2019.
Cette page est générée par un composant COM+ développé en Visual FoxPro 9.0-SP2-HF3