Bing Maps API |
Titre du sujet : Bing Maps API par VisiteurXL le 08/08/2013 12:42:30 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 |
Forums