0

我从以 Openlayers 格式放置的 web 服务坐标获取?

坐标看起来像(在荷兰):

    X = 217382.52712700056
    Y = 576653.00667405012

我想将它们转换为经度/纬度(十进制格式),例如 5.34343、51.34356

我认为它是球形墨卡托米的格式。我用这个公式来转换它。但结果毫无意义。

Dim mercX As Double = 217382.52712700056
Dim mercY As Double = 576653.00667405012
Dim rMajor As Integer = 6378137
Dim shift As Double = Math.PI * rMajor
Dim lon As Double = mercX / shift * 180.0
Dim lat As Double = mercY / shift * 180.0
lat = 180 / Math.PI * (2 * Math.Atan(Math.Exp(lat * Math.PI / 180.0)) - Math.PI / 2.0)

希望有人可以进一步帮助我....

4

1 回答 1

1

如果这些值来自 OpenLayers(我假设您是从一些底图(例如 google 或 bing,所以是球形墨卡托底图)获得它们),它们应该基于 EPSG:900913(或 EPSG:3857)以米为单位。无论如何,它会很高兴知道您是如何获得这些值的。我试过这个网站:

http://cs2cs.mygeodata.eu/

但输出是:

longitude = 1.95278046619
latitude = 5.17311926477

这也没有任何意义。我附上了一张图片,向您展示我做了什么。

希望这可以帮助,

在此处输入图像描述

于 2013-06-08T21:09:10.350 回答