WEICHBRODT.it
Home » wHow? » VB.net » Google Maps

Google Maps

The WEICHBRODT.it's How-To Directory

Categoria: VB.NET

Descrizione

Questa funzione genera una mappa di Google Maps a partire dalle coordinate (latitudine e longitudine) passate come argomento.
La funzione è facilmente integrabile in un componente WebBrowser.

Google Maps

Codice

Private Function GoogleMaps(ByVal latitudine As String, ByVal longitudine As String) As String

         Return "<html>" & _
                "<body bgcolor=""#E0DFE3"" marginwidth=""0"" marginheight=""0"">" & _
                "<iframe width=""425"" " & _
                "height=""350"" " & _
                "frameborder=""0"" " & _
                "scrolling=""no"" " & _
                "marginheight=""0"" " & _
                "marginwidth=""0"" " & _
                "src=""http://maps.google.it/maps?f=q&sll=" & longitudine & "," & latitudine & _
                "&ie=UTF8&" & _
                "ll=" & longitudine & "," & latitudine & _
                "&z=17&output=embed"">" & _
                "</iframe>" & _
                "</body>" & _
                "</html>"

End Function

Utilizzo

Volendo visualizzare in una applicazione Windows form una mappa di Google Maps centrata su Piazza del Duomo di Milano, è sufficiente utilizzare un controllo WebBrowser ed impostarne la proprietà DocumentText() attraverso la nostra funzione a cui avremo passato le coordinate appropriate.

Ovviamente per poter funzionare correttamente occorre essere collegati ad internet.

Public Class frmTest

   Private Sub frmTest_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

      ' Mostra una mappa di Google Maps
      ' centrata sulle coordinate di Piazza del Duomo di Milano
      ' Latitudine = 9.190321
      ' Longitudine = 45.464164

      WebBrowser1.DocumentText = GoogleMaps("9.190321", "45.464164")

   End Sub

   Private Function GoogleMaps(ByVal latitudine As String, ByVal longitudine As String) As String

         Return "<html>" & _
                "<body bgcolor=""#E0DFE3"" marginwidth=""0"" marginheight=""0"">" & _
                "<iframe width=""425"" " & _
                "height=""350"" " & _
                "frameborder=""0"" " & _
                "scrolling=""no"" " & _
                "marginheight=""0"" " & _
                "marginwidth=""0"" " & _
                "src=""http://maps.google.it/maps?f=q&sll=" & longitudine & "," & latitudine & _
                "&ie=UTF8&" & _
                "ll=" & longitudine & "," & latitudine & _
                "&z=17&output=embed"">" & _
                "</iframe>" & _
                "</body>" & _
                "</html>"

   End Function

End Class

Commenti

Non ci sono commenti per questa pagina. Vuoi essere il primo a postare un commento?

Scrivi un commento

Nome
Email (non verrà pubblicato)
Web (opzionale)
Inviami una notifica quando un nuovo commento viene aggiunto a questa pagina
Commento
  This is a captcha-picture. It is used to prevent mass-access by robots. (see: www.captcha.net)
Inserisci i caratteri di controllo
 

Segnala questa pagina:

Email facebook twitter LinkedIn Tumblr technorati.com del.icio.us FriendFeed digg
Print This Page
Torna su
| Contatti | Mappa | Link |
© WEICHBRODT.it - Grafica, layout e contenuti sono di esclusiva proprietà di Andrea Weichbrodt