Sub btn10_Clicked(Target As String)
Dim gm1 As ABMGoogleMap = page.Component("gm1")
gm1.AddMarker("start", 50.8500, 2.8833, ABM.COLOR_RED, "", "")
gm1.AddMarkerEx("stop", 50.9333, 3.1167,"STOP", "{B}{C:#f44336}VUN:{/C}{/B} 15{BR}{B}{C:#f44336}TIME:{/C}{/B} 15:31", "https://developers.google.com/maps/documentation/javascript/examples/full/images/beachflag.png", True)
gm1.AddRoute(50.8500, 2.8833, 50.9333, 3.1167, ABM.GOOGLEMAP_TRAVELMODE_DRIVING, ABM.COLOR_DEEPPURPLE, ABM.INTENSITY_NORMAL, 0.6, 5)
gm1.FitZoom
gm1.refresh ' IMPORTANT
End Sub