Forums XLPages

Excel & VBA Forum principal [résolu] Bing Maps API

Bing Maps API
#1
XLvisiteur_
Posté le : 08-08-2013 12h42

Bonjour,

 

Suite au tutoriel sur la Cartographie et la Localisation Géographique et au passage de 'Visual Earth' à 'Bing Maps' je souhaiterais réaliser le même genre d'application mais en utilisant le 'AJAX Control, Version 7.0' puisque c'est désormais celui-ci qui est recommandé.

 

J'ai utilisé pour la connexion:

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
   <head>
      <title></title>
      <meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>

      <script type="text/javascript" src="http://ecn.dev.virtualearth.net/mapco ... "></script>

      <script type="text/javascript">

        function GetMap()
        {
			var map = new Microsoft.Maps.Map(document.getElementById("mapDiv"), {credentials:"******"});
        }
		
      </script>
   </head>
   
   <body onload="GetMap();"> 
      <div id='mapDiv' style="position:absolute; width:700px; height:700px;"></div>
   </body>
   
</html>

Et puis au niveau du 'Userform':

Option Explicit

Private Sub cmbCentrer_Click()
  EnvoiScript "map.setView({center: new Microsoft.Maps.Location(47, -122), zoom: 14, animate: false });"
End Sub

Private Sub UserForm_Initialize()
  wbrBrowser.Navigate ThisWorkbook.Path & "\connexion.html"
End Sub

Private Sub EnvoiScript(Js As String)
  wbrBrowser.Document.parentWindow.execScript Js, "Javascript"
End Sub

Mais sans succès. Cette méthode ne fonctionne pas.

Est-ce que quelqu'un aurait quelques pistes quant à l'utilisation du contrôle dans sa version 7.0 ?

 

Par avance merci
Rapport   Haut 

Re: Bing Maps API
#2
XLvisiteur_
Posté le : 08-08-2013 13h27

La solution à mon problème était dans le fichier de connexion.

Il faut mettre:

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
   <head>
      <title></title>
      <meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>

      <script type="text/javascript" src="http://ecn.dev.virtualearth.net/mapco ... "></script>

      <script type="text/javascript">
	  
		var map=null;
		
        function GetMap()
        {
			map = new Microsoft.Maps.Map(document.getElementById("mapDiv"), {credentials:"******"});
        }
		
      </script>
   </head>
   
   <body onload="GetMap();"> 
      <div id='mapDiv' style="position:absolute; width:700px; height:700px;"></div>
   </body>
   
</html>

 
Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes