Google maps et VB6
thierrydelepine
Messages postés
521
Date d'inscription
mardi 24 décembre 2002
Statut
Membre
Dernière intervention
11 septembre 2008
-
13 juin 2007 à 15:34
2001simo2002 Messages postés 2 Date d'inscription mardi 22 janvier 2008 Statut Membre Dernière intervention 23 août 2010 - 23 août 2010 à 20:54
2001simo2002 Messages postés 2 Date d'inscription mardi 22 janvier 2008 Statut Membre Dernière intervention 23 août 2010 - 23 août 2010 à 20:54
A voir également:
- Visual maps google
- Google maps api - Conseils pratiques -PHP
- Api google maps javascript ✓ - Forum PHP
- Google length ✓ - Forum C# / .NET
- Kml google maps ✓ - Forum PHP
- Google map distance entre deux points - Forum PHP
3 réponses
gregory__forel
Messages postés
36
Date d'inscription
lundi 18 juillet 2005
Statut
Membre
Dernière intervention
18 juillet 2008
13 juin 2007 à 17:14
13 juin 2007 à 17:14
Salut,
Il n'existe pas, à ma connaissance, de librairie qui te permette de piloter Google Maps avec vb6. Tu dois le piloter par Javascript, ou alors développer du code en vb6 (ou n'importe quel autre langage) qui te génère du code Javascript dans une page Web.
J'avoue que j'ai peu cherché sur Google, mais je pense que si une telle libraire existait, on en parlerait beaucoup.
Bye.
Greg
Il n'existe pas, à ma connaissance, de librairie qui te permette de piloter Google Maps avec vb6. Tu dois le piloter par Javascript, ou alors développer du code en vb6 (ou n'importe quel autre langage) qui te génère du code Javascript dans une page Web.
J'avoue que j'ai peu cherché sur Google, mais je pense que si une telle libraire existait, on en parlerait beaucoup.
Bye.
Greg
KenOgilvie
Messages postés
3
Date d'inscription
dimanche 5 février 2006
Statut
Membre
Dernière intervention
16 juillet 2007
14 juil. 2007 à 12:51
14 juil. 2007 à 12:51
Utilise le code :
Public Sub GoogleMap(sAdd As String, sCity As String, sZip As String, sName As String)
Dim sBrow As String
Dim oExp As Object
sBrow = "http://maps.google.com/maps?q="
sBrow = sBrow & sAdd & ",+" & sCity & ",+" & sZip & "+(" & sName & ")&hl=en&z=8"
Set oExp = CreateObject("InternetExplorer.application")
oExp.Visible = True
oExp.Navigate sBrow
End Sub
le parametre &hl=en pour anglais - &z=8 pour zoom
Ken Ogilvie
Public Sub GoogleMap(sAdd As String, sCity As String, sZip As String, sName As String)
Dim sBrow As String
Dim oExp As Object
sBrow = "http://maps.google.com/maps?q="
sBrow = sBrow & sAdd & ",+" & sCity & ",+" & sZip & "+(" & sName & ")&hl=en&z=8"
Set oExp = CreateObject("InternetExplorer.application")
oExp.Visible = True
oExp.Navigate sBrow
End Sub
le parametre &hl=en pour anglais - &z=8 pour zoom
Ken Ogilvie
2001simo2002
Messages postés
2
Date d'inscription
mardi 22 janvier 2008
Statut
Membre
Dernière intervention
23 août 2010
23 août 2010 à 20:54
23 août 2010 à 20:54
bonjour
je suis ahmed elhousni
je vous remercier beaucoup
je suis ahmed elhousni
je vous remercier beaucoup
