WebBrowser Control - ms/ACCESS

here is a start for you:

Private Sub cmdTest_Click()
'161009 strive4peace
'NEEDS Reference to Microsoft HTML Object Library
   Dim oDocument As HTMLDocument
   Dim oElement As HTMLHtmlElement
   
   Dim sID As String
   Set oDocument = Me.WebBrowser0.Object.Document
   For Each oElement In oDocument.all
      sID = oElement.id
      If sID <> "" Then
         Debug.Print sID, oDocument.getElementById(sID).outerHTML
      End If
   Next oElement

End Sub

Select all Open in new window

Hi

I am trying to understand your suggestion...

The suggested code is:

   Dim oDocument As HTMLDocument
   Dim oElement As HTMLHtmlElement
   
   Dim sID As String
   Set oDocument = Me.WebBrowser0.Object.Document
   For Each oElement In oDocument.all
      sID = oElement.id
      If sID <> "" Then
         Debug.Print sID, oDocument.getElementById(sID).outerHTML
      End If
   Next oElement

So, if I correctly understand, we have an HTML document, internal to the app that is set to the value of the WebBrowser container.

If any of the elements of the WebBrowser are not empty they get printed out (I guess that the rationale is to find which oDocument element contains the , but, the method debug.print is not printing anything...




var map = new Microsoft.Maps.Map(document.getElementById('myMap'), {
    credentials: 'Your Bing Maps Key'
});
var pushpin = new Microsoft.Maps.Pushpin(map.getCenter(), {
    icon: createRedArrow(45),
    anchor: new Microsoft.Maps.Point(12, 12)
});
map.entities.push(pushpin);
function createRedArrow(heading) {
    var c = document.createElement('canvas');
    c.width = 24;
    c.height = 24;
    var ctx = c.getContext('2d');
    // Offset the canvas such that we will rotate around the center of our arrow
    ctx.translate(c.width * 0.5, c.height * 0.5);
    // Rotate the canvas by the desired heading
    ctx.rotate(heading * Math.PI / 180);
    //Return the canvas offset back to it's original position
    ctx.translate(-c.width * 0.5, -c.height * 0.5);
    ctx.fillStyle = '#f00';
    // Draw a path in the shape of an arrow.
    ctx.beginPath();
    ctx.moveTo(12, 0);
    ctx.lineTo(5, 20);
    ctx.lineTo(12, 15);
    ctx.lineTo(19, 20);
    ctx.lineTo(12, 0);
    ctx.closePath();
    ctx.fill();
    ctx.stroke();
    // Generate the base64 image URL from the canvas.
    return c.toDataURL();
}

do you have a KEY to use bing maps? You may want to use google maps instead ...

Nope, I still do not have a key. I didn't looked for it.  Currently, it shows almost what I want, but no pushpins or text that I can send through the Web Browser so I the user may see what he/she needs.

Anyway I am really KEEN on using Google Maps (although images are much worse, believe it or not).
I just don't know how to open a google map in the WebBrowser and set the parameters I want (actually just a few pushpins whose type depend on the type of object I need to represent and small text.

Do you know how to do it?

Easier or not, the behaviour is the same as they both call IE.

/gustav

they are a little different -- the first web browser control (the 7th tool shown in the controls group)  does not have a Navigate method.  Not sure what is used instead.

well I am closing this question as there is a similar stream on other one. But is remains: how do I do it?