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 回答