Solved

Run-Time error '429': ActiveX component can't create object

Posted on 2009-03-30
20
2,866 Views
Last Modified: 2013-11-27
We had a PC bite the dust last week. So it had to be reformatted.  In doing so, we later realized that some applications needed re-installing that did not have proper documentation on procedure.

This machine runs XP pro SP3 Build 2600 and has a macro in an Excel 2002 worksheet.  This worksheet formats and returns data from a Access 97 database.  When we first re-installed the Access program it said we did not have licensing on the machine.  So we looked up the fix and used the hatten.ttf font fix.  

When we went to run the macro we got the error:
Run-Time error '429': ActiveX component can't create object

When we debugged the code it pointed to this section:

====================================================
Public DB1 As Database
Public DB2 As Database
Public ObjConn1
Public ObjConn2

Sub ShowDialog()
    UserForm1.LabelProgress.Width = 0
    UserForm1.Show
   
End Sub
Sub Main()


Windows("EmployeeFileFormatted_Expanded.xls").Activate

If Sheet1.CMBcos.Value = "8400" Then
    Set DB1 = OpenDatabase("X:\ClientPath\8400.mdb")
    Set ObjConn1 = CreateObject("ADODB.connection")
        ObjConn1.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=X:\ClientPath\8400.mdb"
    Set DB2 = OpenDatabase("X:\ClientPath\8400.mdb")
    Set ObjConn2 = CreateObject("ADODB.connection")
        ObjConn2.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=X:\ClientPath\8400.mdb"
       
   Else
    Set DB1 = OpenDatabase("X:\ClientPath\7426.mdb")
    Set ObjConn1 = CreateObject("ADODB.connection")
        ObjConn1.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=X:\ClientPath\7426.mdb"
    Set DB2 = OpenDatabase("X:\ClientPath\7426.mdb")
    Set ObjConn2 = CreateObject("ADODB.connection")
        ObjConn2.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=X:\ClientPath\7426.mdb"
End If

Call StartEmployeeFiles

End Sub

====================================================

In this section "X:" is a mapped drive on a server.

After trying several attempts at "complete" unistalling we recieve the same error.

The strange part is this worked on the same station with the same code before the crash, and works on a different station in the office.

Are there any suggestions out there?
Any help would be widely appreciated.
0
Comment
Question by:DarinAlred
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 12
  • 4
  • 2
20 Comments
 
LVL 16

Expert Comment

by:RichardSchollar
ID: 24022724
Hi

If from within the VBE you go Tools>References and scroll down the list do you see items listed as "Microsoft ActiveX Data Objects XX Library" listed?

Richard
0
 

Author Comment

by:DarinAlred
ID: 24022985
I get "Error Accessing System Registry" when I click on references.
0
 
LVL 16

Expert Comment

by:RichardSchollar
ID: 24023253
That doesn't sound at all good.  Have you tried reregistering Excel?  From the Windows Start Menu, click Run and type in:

Excel.exe /unregserver

and then enter:

Excel.exe /regserver

Richard
0
Free learning courses: Active Directory Deep Dive

Get a firm grasp on your IT environment when you learn Active Directory best practices with Veeam! Watch all, or choose any amount, of this three-part webinar series to improve your skills. From the basics to virtualization and backup, we got you covered.

 

Author Comment

by:DarinAlred
ID: 24023377
The result is:
One of your object libraries (l) is missing or damaged. Please run setup to install it.
click Ok
One of your object libraries (vbaen32.olb) is missing or damaged. Please run setup to install it.
clicked OK

Then a Microsoft Office configure script ran and completed.

Yet, I get the same result.

I will try again, and this time re-boot.
0
 

Author Comment

by:DarinAlred
ID: 24023405
No change after reboot.
0
 

Author Comment

by:DarinAlred
ID: 24023642
We also tried to install the Jet 4.0 latest db from file:
WindowsXP-KB829558-x86-ENU.exe

However the result said the file was older than the current service pack installed and did not need an upgrade.

We also downloaded and installed the file:
WindowsXP-Windows2000-Script56-KB917344-x86-enu.exe

for the Windows scripter.  

This also had no effect.
0
 
LVL 85

Expert Comment

by:Rory Archibald
ID: 24027357
Did you do a full Office installation, including all optional components?
0
 

Author Comment

by:DarinAlred
ID: 24028938
The office installations were:
CD - 1.  Full office 2002 installation except access
CD - 2.  Access 1997 and datawriter utils only
0
 

Author Comment

by:DarinAlred
ID: 24029066
I think the only option I have now is to completely unistall both office installations and start from scratch.

What I don't remember is all the components that my code needed to work.
I reference the Jet 4.0 OLEDB connection but I can't remember if I had to install or what, and now that I am on XP SP3; whereas I was on XP SP2 when I wrote it, I don't know what changes that will do.

I will make a new incident if I need to in order to answer these questions; but in general I just need it to work again, since I can't spend much more time on the issue.
0
 
LVL 85

Expert Comment

by:Rory Archibald
ID: 24029768
Did you install Access 97 after you installed Office XP? I would recommend doing it the other way round, assuming you really need Access 97 for some reason.
0
 

Author Comment

by:DarinAlred
ID: 24033668
Rorya,

We installed Office XP first and then Access 97.  We have to use Access 97 because of proprietary 3rd party software that some of the older clients still use.
0
 
LVL 85

Expert Comment

by:Rory Archibald
ID: 24033876
That's fine - I'm just saying to install the older software before the newer - i.e Access 97, then do Office XP.
0
 

Author Comment

by:DarinAlred
ID: 24050755
I will try your answer Rorya, however, it may be this weekend before I can do so.  If it works, I'll give you full credit.
0
 

Author Comment

by:DarinAlred
ID: 24092308
I have unistalled all Microsoft office components; reinstalled Access 97 only and then Office XP without installing Access XP and repaired the installation; yet there is no fix.

I still get the same error message I started out with; and I still get the error connecting to registry from the VB >Tools>References menu.  As well, VB apps are not running on my pc at all.
0
 

Author Comment

by:DarinAlred
ID: 24097475
Last night I stayed late and unistalled all the office products on my pc.  Next, I installed the Office 97 registry and file eraser utility recommended by Microsoft for the issue I have.  However, it doesn't run on XP.  

I also tried to run msicuu2.exe which is the office installer cleanup also recommended by Microsoft and it complains about a file called StartMsi.vbs with the same Library not registered error.  Then I tried to re-install the Windows Script 5.6, which said it completed, yet when I ran any .vbs file I got the same Library error.  Next, I tried re-installing the windows installer, but the one on the Microsoft site is a older version and it says I do not need to install the file.  Finally, I re-registered the CDonts.dll and wshom.ocx because those two file flagged an error after unistalling the Office products upon restarting the pc.  

After all that, I reinstalled only Office XP 2002 without Access.  The same error displayed upon running any .vbs file.  The very last thing I tried was to install Visual Studio 2008 with Microsoft Visual Basic, Visual C#, Visual C++, Visual Studio Tools for Office, and Visual Web Developer.  However, even that did not solve my problem.

If anyone has even the slightest clue how I can fix this without reformatting the drive, please let me know.  Otherwise, I'll probably end up deleting the installed partition of Windows and starting from scratch by Saturday.
0
 

Author Comment

by:DarinAlred
ID: 24097555
After looking back through my comments I wanted to clarify the error message that happens when I run any .vbs program : Library not registered. code 8002801D.  I am still having the same error message about the Active-X component that started this question.  I do believe they are related because this is a macro using the excel Visual Basic Script, and no .vbs files are running on my machine at all.

0
 

Accepted Solution

by:
DarinAlred earned 0 total points
ID: 24119816
I tried three more fixes from the Microsoft site.  I installed Seagate Cyrstal 8.0 which has a known bug that produces this error.  So, I got the regfix from SAP; and it still didn't fix the problem.  Then I went through two more registery changes where I added the "everyone" profile to allow to make changes to specific entries, again listed at Microsoft.com.  Still my efforts have all been fruitless.

However, I will now just reformatt the drive on the machine; deleting the partition and re-loading the OS.
0
 
LVL 85

Expert Comment

by:Rory Archibald
ID: 24151873
I do apologise for spending my own free time trying to help you. Rest assured, it won't happen again.
Rory
0

Featured Post

The Eight Noble Truths of Backup and Recovery

How can IT departments tackle the challenges of a Big Data world? This white paper provides a roadmap to success and helps companies ensure that all their data is safe and secure, no matter if it resides on-premise with physical or virtual machines or in the cloud.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Access custom database properties are useful for storing miscellaneous bits of information in a format that persists through database closing and reopening.  This article shows how to create and use them.
This article describes a serious pitfall that can happen when deleting shapes using VBA.
Access reports are powerful and flexible. Learn how to create a query and then a grouped report using the wizard. Modify the report design after the wizard is done to make it look better. There will be another video to explain how to put the final p…
Add bar graphs to Access queries using Unicode block characters. Graphs appear on every record in the color you want. Give life to numbers. Hopes this gives you ideas on visualizing your data in new ways ~ Create a calculated field in a query: …

632 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question