I've build an App in Access 2007 with MapWinGis ocx 4.92 (windows 7 64 bit). For the Moment I just use the Form to show tiles from various Providers. I can make changes in code and save them, but in the end access always crashes, especially when I close the form or Access. This is the complete code I use at form load:
Private Sub Form_Load()
Dim eXTent As New MapWinGIS.Extents
eXTent.SetBounds 1020000, 7023000, 0, 1220000, 7140000, 0
Map1.CursorMode = 2 'Pan
Map1.SendMouseDown = True
Map1.SendMouseMove = False
Map1.SendSelectBoxFinal = False
Map1.ProjectionMismatchBehavior = tkMismatchBehavior.mbCheckStrictAndReproject
Map1.Projection = tkMapProjection.PROJECTION_GOOGLE_MERCATOR
Map1.Tileprovider = tkTileProvider.GoogleMaps
Map1.Extents = eXTent
Can anyone tell me why the program crashes?
Does the new OCX no longer work with Access and VBA?
Thanks for any help
Private Sub Form_Load()
Dim eXTent As New MapWinGIS.Extents
eXTent.SetBounds 1020000, 7023000, 0, 1220000, 7140000, 0
Map1.CursorMode = 2 'Pan
Map1.SendMouseDown = True
Map1.SendMouseMove = False
Map1.SendSelectBoxFinal = False
Map1.ProjectionMismatchBehavior = tkMismatchBehavior.mbCheckStrictAndReproject
Map1.Projection = tkMapProjection.PROJECTION_GOOGLE_MERCATOR
Map1.Tileprovider = tkTileProvider.GoogleMaps
Map1.Extents = eXTent
Can anyone tell me why the program crashes?
Does the new OCX no longer work with Access and VBA?
Thanks for any help