Run time error 429 Active X Component can't create object

[ramprat]

I have an Access database (Access 2003). I am running Windows 2000. Until recently I have been able to run VBA code within this database on my machine but lately when I try it I get the Run time error 429 Active X Component can't create object error when the code reaches the following line

Set db = DBEngine(0)(0)

This is part of the code below.

Dim db As Database
Dim rs As Recordset
Set db = DBEngine(0)(0)
Set rs = db.OpenRecordset("maxtraffic", dbOpenTable)

Can anyone tell me what I need to do to solve this? I can't understand why it used to work and now it doesn't!!!

Thanks

[nico5038]

Checkout http://support.microsoft.com/kb/319844

Nic;o)