关于用经纬度计算距离.docVIP

关于用经纬度计算距离：　　地球赤道上环绕地球一周走一圈共 40075.04公里, 而@一圈分成360°,而每1°(度)有60, 每一度一秒在赤道上的长度计算如下：　　40075.04km/360°=111.31955km　　111.31955km/60=1.8553258km=1855.3m　　而每一分又有60秒, 每一秒就代表 1855.3m/60=30.92m　　任意两点距离计算公式为　　d＝111.12cos{1/[sinΦAsinΦB十 cosΦAcosΦBcos(λB—λA)]}　　其中A点经度，纬度分别为λA和ΦA，B点的经度、纬度分别为λB和ΦB，d为距离。?表 Select NLat As 纬度,NLon As 经度 From t_Data_G0001 Where STID= And DStampTime=;? Select LLat As 纬度2,LLon As 经度2 From o_GISLabel Where SID =@SID;? 时间为基准/**** 根据两站点的经纬度求两站点间的距离 ****/经纬度的计算函数是这样的：double D_jw(double wd1,double jd1,double wd2,double jd2){? double x,y,out;? double PI=3? double R=6.371229*1e6;? x=(jd2-jd1)*PI*R*cos( ((wd1+wd2)/2) *PI/180)/180;? y=(wd2-wd1)*PI*R/180;? out=hypot(x,y);? return out/1000;} 对我有用[0] 丢个板砖[0] 引用 举报 管理 TOP 精华推荐：div+css和table布局的讨论，欢迎拍砖！ gisfarmer (流氓骆驼) 等　级： #2楼 得分：10回复于：2008-10-20 16:48:08C# code // 计算已知经纬度的两点间的距离 // Thu 2005.08.04 using System; struct JWD { double JD, JF, JM; double WD, WF, WM; public double Jd, Wd, J, W; public const double Ea = 6378137; // 赤道半径 public const double Eb = 6356725; // 极半径 public readonly double Ec; public readonly double Ed; // 构造函数, 经度: a 度, b 分, c 秒; 纬度: d 度, e 分, f 秒 public JWD(double a, double b, double c, double d, double e, double f) { JD=a; JF=b; JM=c; WD=d; WF=e; WM=f; Jd = JD + JF / 60 + JM / 3600; Wd = WD + WF / 60 + WM / 3600; J = Jd * Math.PI / 180; W = Wd * Math.PI / 180; Ec = Eb + (Ea - Eb) * (90-Wd) / 90; Ed = Ec * Math.Cos(W); } } class Test { st