Hi all !
Is it possible to get GPS coordinates by address ?
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour GPS coordinates
https://stackoverflow.com/questions/11318347/geoencode-address-to-gps-coordinates
<script type="text/javascript">
var dir1 = "5th ave, new york";
var google_url = "http://maps.googleapis.com/maps/api/geocode/json?address=";
var sensor = "&sensor=false";
var resultado;
function myFunction(){
$.getJSON(
google_url+dir1+sensor,
function(result){
$( "body" ).append( "Latitude: " + JSON.stringify(result.results[0].geometry.bounds.northeast.lat) )
$( "body" ).append( "Longitude: " + JSON.stringify(result.results[0].geometry.bounds.northeast.lng) )
});
}Thanks it is excellent! But how to make it on a FWH 18.06 ?!
#include "FiveWin.ch"
function Main()
local cGoogleURL := "http://maps.googleapis.com/maps/api/geocode/json?address="
local cAddress := "5th ave, new york"
local cSensor := "&sensor=false"
local cKey := "&key=" + MY_API_KEY
MsgInfo( WebPageContents( cGoogleURL + cAddress + cSensor + cKey ) )
return nilTo get your API Key:
https://developers.google.com/maps/documentation/android-sdk/signup
run ok
but Now how obtainthe Lat e long from that message ?
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
if you want you can try Nominatim with its Web API.
For example
For example
#include <fivewin.ch>
function Main()
local cGoogleURL := "https://nominatim.openstreetmap.org/search?format=json&q="
local cAddress := "5th ave, new york"
local aReturn, i, cTxt := ""
aReturn := hb_jsonDecode( WebPageContents( cGoogleURL + cAddress) )
if !empty(aReturn)
for i:=1 to len(aReturn)
cTxt += aReturn[i,"display_name"] + e"\r\n"
cTxt += aReturn[i,"lat"]+" "+aReturn[i,"lon"] + e"\r\n" + e"\r\n"
next
else
cTxt:="not found"
endif
MsgInfo(cTxt)
return nil
Hello Antonino,
when I try your sample I get only a number as aReturn.
CAn you help us, please.
Best regards,
Otto
Otto:
This is correct:
Regards
This is correct:
#include "FiveWin.ch"
function Main()
local cGoogleURL := "https://nominatim.openstreetmap.org/search?format=json&q="
local cAddress := "5th ave, new york"
local aReturn, i, cTxt := ""
// aReturn := hb_jsonDecode( WebPageContents( cGoogleURL + cAddress) ) // *** Change this ***
aReturn := WebPageContents( cGoogleURL + cAddress)
hb_jsondecode( aReturn, @aReturn )
if !empty(aReturn)
for i:=1 to len(aReturn)
cTxt += aReturn[i,"display_name"] + e"\r\n"
cTxt += aReturn[i,"lat"]+" "+aReturn[i,"lon"] + e"\r\n" + e"\r\n"
next
else
cTxt:="not found"
endif
MsgInfo(cTxt)
return nilRegards
Saludos,
Carlos Gallego
*** FWH-25.12, xHarbour 1.3.1 Build 20241008, Borland C++7.70, PellesC, ADS 11.1***
Hello Antonino, hello Carlos,
Thank you so much. All working.
Best regards,
Otto
Thank you so much. All working.
Best regards,
Otto
I am not sure, but the different syntax of hb_jsondecode is relative the Harbour and XHarbour implementations.
You can do the get on browser and use some tools like JSON formatter to see that there are a lot of other information.
You can do the get on browser and use some tools like JSON formatter to see that there are a lot of other information.