求已知經緯度算距離的方法：我用的是PL/SQLDeveloper，已在Oracle上傳了帶經緯度的小區(qū)工參，相求大仙們給寫一段腳本，算出任意兩站間的距離。跪謝！

MS-SQL版本

Create FUNCTION [dbo].[GetDistance](@Lat1 float,@Lon1 float,@Lat2 float,@Lon2 float) RETURNs float
AS
BEGIN
 DECLARE @ret float;
 DECLARE @r float;
 DECLARE @A float;
 DECLARE @B float;
 DECLARE @RA float;
 DECLARE @RB float;
 DECLARE @RL1 float;
 DECLARE @RL2 float;
 SELECT @r = 6371138, @A = abs(@Lat1 - @Lat2), @B = abs(@Lon1 - @Lon2), @RA = @A * pi() / 180.0, @RB = @B * pi() / 180.0, @RL1 = @Lat1 * pi() / 180.0, @RL2 = @Lat2 * pi() / 180.0, @ret = cast(2 * @r * asin(sqrt(sin(@RA/2) * sin(@RA/2) + cos(@RL1) * cos(@RL2) * sin(@RB/2) * sin(@RB/2))) as decimal(8,3));
 RETURN @ret
END

GO