一小时前一切都运转良好,但现在我尝试的任何事情都有错误。
strFullAddress = "texas. usa"
GeoCode = GMap1.getGeoCodeRequest(strFullAddress, sMapKey)
Dim gLatLng As New Subgurim.Controles.GLatLng(GeoCode.Placemark.coordinates.lat, GeoCode.Placemark.coordinates.lng)
Dim oMarker As New Subgurim.Controles.GMarker(gLatLng)
GMap1.Add(oMarker)
以前工作得很好。现在这只是在非洲留下了一个标记。对于任何地址或任何格局我都有相同的结果......没有其他人似乎有这个问题,我没有想法...... 那么,关于可能发生什么的任何想法?
编辑:
我尝试了这个示例代码,当我学习如何使用subgurim时它也适用于我,它也只是在非洲旁边放置一个标记。
Dim strFullAddress As String
Dim sMapKey As String =
ConfigurationManager.AppSettings("googlemaps.subgurim.net")
Dim GeoCode As Subgurim.Controles.GeoCode
' Combine our address fields to create the full address. The street,
' suburb and country should be seperated by periods (.)
strFullAddress = txtStreetAddress.Text & ". " & txtSuburb.Text & ". " & txtCountry.Text
' Work out the longitude and latitude
GeoCode = GMap1.getGeoCodeRequest(strFullAddress, sMapKey)
Dim gLatLng As New Subgurim.Controles.GLatLng(GeoCode.Placemark.coordinates.lat, GeoCode.Placemark.coordinates.lng)
' Display the map
GMap1.setCenter(GLatLng, 16, Subgurim.Controles.GMapType.GTypes.Normal)
Dim oMarker As New Subgurim.Controles.GMarker(GLatLng)
GMap1.Add(oMarker)
GMap1.GZoom = 5