Seemingly Insoluble Problem with MapPoint & MS-Access “Run-time error '429' ActiveX component can't create object”

After days of searching the web including ‘Experts Exchange’ for a resolution to this problem I decided that I would have to post the question. Can anyone help?

I simply want to be able to use MapPoint from Access.

Reinstalled 3 times with absolutely nothing else running
and removing all traces that I could find of earlier installations

I've tried all the following to register MapPoint
MapPoint /regserver
MapPoint.exe /regserver
"E:\Program Files\Microsoft MapPoint Europe\MapPoint.exe" /regserver

References in Access:

Microsoft MapPoint 11.0 Object Library (Europe)
Microsoft MapPoint Control 11.0
Microsoft MapPoint Utilities 1.0 Type Library
(Will load either 1 of the top 2 and the third reference)

Tried the following

Sub Test()
IsProgInstalled ("Word")
IsProgInstalled ("Access")
IsProgInstalled ("Powerpoint")
IsProgInstalled ("Excel")
IsProgInstalled ("Outlook")
IsProgInstalled ("Infopath")
IsProgInstalled ("Mappoint")
IsProgInstalled ("Mappoint.eu")
IsProgInstalled ("Mappoint.eu.11")
Dim MPApp As MapPoint.Application
Set MPApp = GetObject(, "MapPoint.Application") 'Run-time error '429'  ActiveX component can't create object
End Sub

Function IsProgInstalled(StrProg As String) As Boolean
Dim obj As Object
On Error Resume Next
    Set obj = CreateObject(StrProg & ".Application")
    IsProgInstalled = (Err.Number = 0)
If IsProgInstalled Then
    Debug.Print StrProg & " is Installed"
Else
    Debug.Print StrProg & " is Not installed"
End If
End Function

Results from above

Word is Installed
Access is Installed
Powerpoint is Installed
Excel is Installed
Outlook is Installed
Infopath is Installed
Mappoint is Not installed
Mappoint.eu is Not installed
Mappoint.eu.11 is Not installed

Any ideas

Thanks

Peter
PeterRollinsonAsked:
Who is Participating?
 
jefftwilleyConnect With a Mentor Commented:
might try getting rid of the comma

Set MPApp = GetObject("MapPoint.Application")
0
 
jefftwilleyCommented:
if GetObject doesn't work...you can try CreateObject
0
 
PeterRollinsonAuthor Commented:
The comma was just another attempt, actually copied to one of the myriad of Microsoft site I have investigated.

Set MPApp = CreateObject("MapPoint.Application") ='Run-time error '429'  ActiveX component can't create object

I forgot to mention that icons have appeared in both Excel & word but don't appear to do anything apart from create errors:

WORD
This object was created in MapPoint
This application in not available to open this object.
Make sure the application is properly installed and that
it has not been deleted, moved, or renamed.

EXCEL
Just flashes a rectangle.
0
Cloud Class® Course: CompTIA Healthcare IT Tech

This course will help prep you to earn the CompTIA Healthcare IT Technician certification showing that you have the knowledge and skills needed to succeed in installing, managing, and troubleshooting IT systems in medical and clinical settings.

 
jefftwilleyCommented:
' Declarations
    Private oApp As MapPoint.Application
    Private WithEvents oMap As MapPoint.Map   ' With Events!


'  Sub to open MapPoint Map.
private sub OpenMap()

        sMePath = AppPath                                         ' Path to Symbols collection
        MapPath = AppPath & "\Templates\mri.ptm"    ' Customize for your system
        oApp = CreateObject("Mappoint.Application")
        oApp.Left = 10
        oApp.Top = 10
        oApp.Visible = True
        oApp.WindowState = MapPoint.GeoWindowState.geoWindowStateNormal
        oMap = oApp.OpenMap(MapPath)
End Sub
0
 
PeterRollinsonAuthor Commented:
jeffwilley,

Private WithEvents oMap As MapPoint.Map   ' With Events!    Code is red
when trying to run OpenMap "WithEvents" Highlight and I get Compile error 'Only valid in Object Mode'

 'Path to Symbols collection ?????

puppydogbuddy,

Tried these to no avail.

What concerns me is that IsProgInstalled function shows MapPoint as not being installed.

I installed MapPoint on my Laptop and everything works as would be expected, works from Word, Excel and Access etc

On my development machine MapPoint works fine but does not seem to integrate with Office 2003.

I have re-installed MapPoint 3 times, Could it be the installation of Office or even worse the installation of Windows XP Professional!
0
 
PeterRollinsonAuthor Commented:
No Nothing.

So I tried re-installing Office 2003 then MapPoint, No Luck
So I bite the Bullet and re-installed Windows XP, Office 2003, MapPoint and what seems like a thousand other programs :(

Hallelujah it worked; I can now us MapPoint from Access :)

Thanks anyway for the attempts.

Pity to waste points so I'll share them out.


All the best

Peter
0
 
jefftwilleyCommented:
It's a shame really when it turns out to be a Gates problem. Very glad you found a solution though...thanks for the poinks.
J
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.