这里用到的算法和地球半径等数据均来自网络，此文只作整理记录。
地球半径值采用赤道半径 6378137.0米，这是1980年的国际标准数据。
下面是在数据库中写的自定义函数，传入两个经纬度点的数据，共4个参数，返回以米为单位的两点之间的距离
- CREATE FUNCTION [f_GetDistance]
- (
- @GPSLng DECIMAL(12,6),
- @GPSLat DECIMAL(12,6),
- @Lng DECIMAL(12,6),
- @Lat DECIMAL(12,6)
- )
- RETURNS DECIMAL(12,4)
- AS
- BEGIN
- DECLARE @result DECIMAL(12,4)
- SELECT @result = 6378137.0*ACOS(SIN(@GPSLat/180*PI())*SIN(@Lat/180*PI())+COS(@GPSLat/180*PI())*COS(@Lat/180*PI())*COS((@GPSLng-@Lng)/180*PI()))
- RETURN @result
- END
- GO
这里用到的算法和地球半径等数据均来自网络，此文只作整理记录。
地球半径值采用赤道半径 6378137.0米，这是1980年的国际标准数据。
下面是在数据库中写的自定义函数，传入两个经纬度点的数据，共4个参数，返回以米为单位的两点之间的距离
- CREATE FUNCTION [f_GetDistance]
- (
- @GPSLng DECIMAL(12,6),
- @GPSLat DECIMAL(12,6),
- @Lng DECIMAL(12,6),
- @Lat DECIMAL(12,6)
- )
- RETURNS DECIMAL(12,4)
- AS
- BEGIN
- DECLARE @result DECIMAL(12,4)
- SELECT @result = 6378137.0*ACOS(SIN(@GPSLat/180*PI())*SIN(@Lat/180*PI())+COS(@GPSLat/180*PI())*COS(@Lat/180*PI())*COS((@GPSLng-@Lng)/180*PI()))
- RETURN @result
- END
- GO