Hi, I am new to MapPoint and using MapPoint 2006. My very first line of MapPoint code throws an error "Run-time error '429': ActiveX component cannot create object"

Here is the code snippet:

Dim objApp As MapPoint.Application
Private MyMap As Map

On Error Goto logerr
Set objApp = GetObject(, "MapPoint.Application")
If objApp Is Nothing Then
Set objApp = CreateObject("MapPoint.Application")
objApp.Visible = False
objApp.UserControl = True
objApp.Activate
Set MyMap = objApp.NewMap()
End If


What am I missing in the code or is it a configuration issue.

Please Help.

Thanks

You need to add the Microsoft MapPoint 11.0 Object Library as a reference in the VBA window.

There is info on how to do this at the top of this page:
Excel User-Defined Functions and MapPoint - MapPoint Articles - MP2K Magazine

I was running into the same issue yesterday, and that was all I had to do to fix it.

Good Luck!

Thanks for reply.
I am using MapPoint 2006
I had already added the reference for "Microsoft Mappoint 13.0 Object Library (North America)"

Hi,

GetObject generate an exception error 429 when the object is still not existand, see this page: GetObject Function (Visual Basic)

So if you want to check if it exists already for eventually re-use then you have to place it into an exception block. Something like this:

Code:

Try
    GetObject ...
Catch
    CreateObject...
End

I dont know VB, so dont rely on the syntax

I commented that part but now it is throwing the same error at "CreateObject("Mappoint.Application")"

''''''Set objApp = GetObject(, "MapPoint.Application")
If objApp Is Nothing Then
Set objApp = CreateObject("Mappoint.Application")
Set MyMap = objApp.OpenMap("C:\ITMS\MAPSHARE\ITMS.PTM")
If (MyMap Is Nothing) Then
Set MyMap = objApp.NewMap()
End If
Else

Hi,

I'm not sure if this is case sensitive: "MapPoint.Application"

However I see something else in your original post: "Run-time error '429': ActiveX component cannot create object". It seems that you use the ActiveX control also in your application, is that right ? Because as far as I know you can not mix the AcitveX control and the object model in the same application.

I tried so many things but nothing works.
Intrestingly the same code(literally as it is) works like a charm in MapPoint 2004.
However the same code fails to instanstiate the object(as the error 429 states) when run in MapPoint 2006.
Note: Interestingly the MapPoint.exe can be seen thru TaskManager.

Here are some of my observation.
My Source Code is in VB6 (SP5)
The VB6 Project adds reference to "Microsoft MapPoint 13.0 Object Library (North America). I am not using MapPoint.ocx to display any Map.

MapPoint 2004 software is using VC++6 DLLs
MapPoint 2006 software is using VC++7 DLLs

Not sure if my PC needs additional runtime files for VC++7 to run effectively.

Originally Posted by sharoma

I am not using MapPoint.ocx to display any Map.

But wy is the error melding complaining about the AcitveX ?

Not sure. It fails at with error 429 at the line "Set objApp = CreateObject("MapPoint.Application")"

Hi,

Eventually I do a test on my machine. At least we know then if it has something todo with the MapPoint installation. If you send the project to my personal email then I do a short test.