Compile Error -> CurrentDB (97)

Topic

New Reply

I have an Access97 databse with this code in it:

Dim myDB as Database
Set myDB = CurrentDb

The application is only used once a month or so and just started throwing this error:

Compile Error:

Function or interface marked as restricted, or the function uses an Automation type
 not supported in Visual Basic.

Any ideas?

Reply | Quote

Replies

A couple of things to check – is the database split into a front-end and a back-end, and do you perhaps have a later version of DAO than that which shipped with Access97. The latter should be DAO 3.5, not DAO 3.6 if you are running Access97 on both the back-end and the front-end. You may want to look at a module and then check the references to see what has been set.

Reply | Quote

It is not split. I checked the DAO and it has 3.6 checked. There were no other versions available in the box. Odd.

A co-worker of hers has a copy of the Database and got it to work so there is no problem anymore.

Thanks for the help.

Reply | Quote

You might try this in future:

Dim myDB as DAO.Database

Reply | Quote

Have a look at :
ACC97: “Function or Interface Marked As Restricted” Error Message When You Try to Open a Database
maybe it can help.

Reply | Quote