0

約 1 時間前はすべて正常に機能していましたが、今は何をしようとしてもエラーが発生しています。

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)

以前は完全に機能していました。これで、アフリカの左側にマーカーが作成されました。どの住所、どの緯度でも同じ結果が得られました... 他の誰もこの問題を抱えていないようで、私にはアイデアがありません... それで、何が起こっているのかについてのアイデアはありますか?

編集:

サブグリムの使い方を学んでいたときにも機能したこのサンプルコードを試してみましたが、アフリカの隣にマーカーを配置するだけです。

    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
4

0 に答える 0