Cerca posizioni di raggio

Utilizzare i dati luoghi ricerca in un raggio di chilometri, miglia o miglia marine.
Si noti che abbiamo creato un indice per i campi Latitudine e Longitudine nel nostro database in modo di ricerca è efficiente.

Esempio pratico

Paese
Codice postale    00118  00121  00132
Distanza

Calc è una variabile in cui si costruisce la formula in modo da poter applicare la SQL.
Lat and Lon le coordinate del fornirete come punto di partenza (decimale, WGS84).
Latitudine e longitudine non colorati sono i nomi dei campi reali nel database.
6378.137 è il diametro della Terra in chilometri, uso: 3963.191 per miglia.

Formula

Calc = 6378.137 * ACos( Cos( RADIANS(Latitude) ) * Cos( RADIANS( Lat ) ) * Cos( RADIANS( Lon ) - RADIANS(Longitude) ) + Sin( RADIANS(Latitude) ) * Sin( RADIANS( Lat ) ) )

SQL = "SELECT Locality, " & Calc & " As Distance FROM Table WHERE " & Calc & " <= '5' ORDER BY Distance"

Esempio di codice in ASP con database MS SQL

<%
ISO  = Request.Form("ISO")
PostalCode = Request.Form("PostalCode")
Distance   = Request.Form("Distance")

If Request.Form("Radius") = "K" Then
   Radius = 6378.137                       'Kilometers

Else
   Radius = 3963.191                       'Miles

End If

 
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open Application("ConnectionString")
Set RS   = Server.CreateObject("ADODB.Recordset")

' Ricercare codici postali per ottenere le coordinate del primo punto
' ---------------------------------------------------------
SQL = "SELECT * FROM [PostalCodes] " & ISO & "' "

SQL = SQL & "AND PostalCode = '" & PostalCode & "';"


Set RS = Conn.Execute(SQL)

Lat = RS("Latitude")
Lon = RS("Longitude")

 

'Costruire la formula: variabile calc per il trattamento facile in SQL

calc = Radius & " * ACos( Cos(RADIANS(Latitude)) * Cos(RADIANS(" & Lat & ")) * Cos(RADIANS(" & Lon & ") - RADIANS(Longitude)) + Sin(RADIANS(Latitude)) * Sin(RADIANS(" & Lat & ")) ) "

SQL = "SELECT TOP 100 "
SQL = SQL & "ISO, "
SQL = SQL & "Postalcode, "
SQL = SQL & "Region1, "
SQL = SQL & "Region2, "
SQL = SQL & "Region3, "
SQL = SQL & "Locality, "
SQL = SQL & "Suburb, "
SQL = SQL & "Latitude, "
SQL = SQL & "Longitude, "
SQL = SQL & calc & " AS Distance "
SQL = SQL & "FROM [PostalCodes] "
SQL = SQL & "WHERE (ISO = '" & ISO & "') "
SQL = SQL & "AND " & calc & " <= " & Distance & " "
SQL = SQL & "ORDER BY Distance ;"

Set RS = Conn.Execute(SQL)

DO While Not RS.EOF

     Response.Write RS("ISO") & "<br>"
     Response.Write RS("PostalCode") & "<br>"
     Response.Write RS("Region1") & "<br>"
     Response.Write RS("Region2") & "<br>"
     Response.Write RS("Region3") & "<br>"
     Response.Write RS("Locality") & "<br>"
     Response.Write RS("Suburb") & "<br>"
     Response.Write FormatNumber(RS("Distance"),1) & "<br>"

RS.MoveNext
Loop
RS.Close
Set RS = nothing

Conn.Close
%>

Esempio di codice in PHP con database MySQL

<?php
if(isset($_GET['Search']))
{
$PostalCode = $_GET['PostalCode'];
$Distance   = $_GET['distance'];

$sqlstring = "SELECT * FROM PostalCodes WHERE PostalCode = '".$PostalCode."'";
$result = mysql_query($sqlstring);

$row = mysql_fetch_assoc($result);

$Lng = $row["Longitude"] / 180 * M_PI;
$Lat = $row["Latitude"] / 180 * M_PI;

mysql_free_result($result);

$sqlstring2 = "SELECT DISTINCT PostalCode, Locality, (6367.41 * SQRT(2 * (1-Cos(RADIANS(Latitude)) * Cos(".$Lat.") * (Sin(RADIANS(Longitude))*Sin(".$Lng.") + Cos(RADIANS(Longitude)) * Cos(".$Lng.")) - Sin(RADIANS(Latitude)) * Sin(".$Lat.")))) AS Distance FROM PostalCodes WHERE (6367.41 * SQRT(2 * (1 - Cos(RADIANS(Latitude)) * Cos(".$Lat.") * (Sin(RADIANS(Longitude)) * Sin(".$Lng.") + cos(RADIANS(Longitude)) * Cos(".$Lng.")) - Sin(RADIANS(Latitude)) * Sin(".$Lat."))) <= '".$Distance."') ORDER BY Distance";

$result = mysql_query($sqlstring2) or die('query failed: ' . mysql_error());

$str = "<table width=\"300\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
$str .= "<tr>";
$str .= "<th>PostalCode</th>";
$str .= "<th>Distance</th>";
$str .= "</tr>";

while ($row = mysql_fetch_array($result, MYSQL_ASSOC))
{
$str .= "<tr><td>".$row["PostalCode"]."</td><td>".$row["place"]."</td><td>".round($row['Distance'])."km</td></tr>";
}

$str .= "</table>";

mysql_free_result($result);
mysql_close($conn);
echo $str;
}
?>
 Dati di riferimento
Divisioni amministrative
Paesi
Nomi paese
Valute
Lingua
Codici postali format
Fusi orari
Formule e campioni
Distanza tra due punti
Localizzare punti di raggio
Codici standard
Codici ISO
Codici NGA
Codici NUTS