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
Pointe Cla H9R 3K8
de la société Carver Technologies Inc.
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é 10469 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é ...

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