super, vielen Dank für die Zeilen

Gruß

Stefan

> Am 30.03.11 11:43, schrieb Stefan Sicurella:
>> Ok, hab auf OpenGeodb eine Datenbank mit den Koordinaten gefunden und eine 
>> mit den PLZ von Deutschland.
>> Damit komme ich erst mal klar... d.h. erst mal die Daten entsprechend 
>> zusammenführen in meiner DB und dann sehe ich weiter
> 
> Für die Entfernungsberechnung:
> 
> -----------------------------------------------------------------------
> 
>  Const PI = 3.14159265358979323846264338327950
>  Const EarthRadius = 6370
> 
>  dim distance as double
> 
>  'Frankfurt/Main, Germany
>  dim latitude1 as double = 50.120578
>  dim longitude1 as double = 8.681946
> 
>  'Berlin, Germany
>  dim latitude2 as double = 52.531261
>  dim longitude2 as double = 13.410187
> 
>  distance = ACos( Sin(latitude1/180*PI) * Sin(latitude2/180*PI) + 
> Cos(latitude1/180*PI) * Cos(latitude2/180*PI) * Cos( (longitude1/180*PI) - 
> (longitude2/180*PI) ) ) * EarthRadius
> 
>  MsgBox Str(distance) + " Km"
> 
> -----------------------------------------------------------------------
> 
> Für die Bogenmaßberechnung in der unteren Formel kannst du dir eine eigene 
> Funktion bauen um das ganze zu kürzen:
> 
> Bogenmaß = GradInDezimal / 180 * PI
> 
> 
> -- 
> Michael Kagerbauer
> http://rbcoder.de
> 


Antwort per Email an