I moved all tables/queries/macros/forms from Access97 to Access2000, when I
ran the compact repair tool, it gave me a compile error in the line

DIM dbs as database

What should I do?

Max wrote:
> I moved all tables/queries/macros/forms from Access97 to Access2000,
> when I ran the compact repair tool, it gave me a compile error in the
> line
>
> DIM dbs as database
>
> What should I do?

Add a reference to the DAO 3.6 library. Access 97 has a reference ot DAO by
default whereas Access 200 does not. If you had simply used Access 2000 to
convert the file this would have been done for you.

--
I don't check the Email account attached
to this message. Send instead to...
RBrandt at Hunter dot com

another error

Set rst = dbs.OpenRecordset(strSQL)

"Rick Brandt" wrote:

> Max wrote:
> > I moved all tables/queries/macros/forms from Access97 to Access2000,
> > when I ran the compact repair tool, it gave me a compile error in the
> > line
> >
> > DIM dbs as database
> >
> > What should I do?
>
> Add a reference to the DAO 3.6 library. Access 97 has a reference ot DAO by
> default whereas Access 200 does not. If you had simply used Access 2000 to
> convert the file this would have been done for you.
>
> --
> I don't check the Email account attached
> to this message. Send instead to...
> RBrandt at Hunter dot com
>
>
>

Max wrote:
> another error
>
> Set rst = dbs.OpenRecordset(strSQL)
>
> "Rick Brandt" wrote:

Both DAO and ADO have a Recordset object so I should have mentioned that in
addition to adding the reference for DAO you need to remove the one for ADO.
Otherwise you have to disambiguate all objects that exist in both libraries.
Instead of...

Dim rst as Recordset

....use...

Dim rst as DAO.Recordset.

--
I don't check the Email account attached
to this message. Send instead to...
RBrandt at Hunter dot com

Thanks Rick

"Rick Brandt" wrote:

> Max wrote:
> > another error
> >
> > Set rst = dbs.OpenRecordset(strSQL)
> >
> > "Rick Brandt" wrote:
>
> Both DAO and ADO have a Recordset object so I should have mentioned that in
> addition to adding the reference for DAO you need to remove the one for ADO.
> Otherwise you have to disambiguate all objects that exist in both libraries.
> Instead of...
>
> Dim rst as Recordset
>
> ....use...
>
> Dim rst as DAO.Recordset.
>
> --
> I don't check the Email account attached
> to this message. Send instead to...
> RBrandt at Hunter dot com
>
>
>

I am having a similar problem. How would I add a reference to DAO 3.6 library?

"Rick Brandt" wrote:

> Max wrote:
> > I moved all tables/queries/macros/forms from Access97 to Access2000,
> > when I ran the compact repair tool, it gave me a compile error in the
> > line
> >
> > DIM dbs as database
> >
> > What should I do?
>
> Add a reference to the DAO 3.6 library. Access 97 has a reference ot DAO by
> default whereas Access 200 does not. If you had simply used Access 2000 to
> convert the file this would have been done for you.
>
> --
> I don't check the Email account attached
> to this message. Send instead to...
> RBrandt at Hunter dot com
>
>
>

With any code module open, select Tools | References from the menu bar,
scroll through the list of available references until you find the one for
Microsoft DAO 3.6 Object Library, and select it. If you're not going to be
using ADO, uncheck the reference to Microsoft ActiveX Data Objects 2.1
Library

--
Doug Steele, Microsoft Access MVP
http://I.Am/DougSteele
(no e-mails, please!)



"D Huber" <(E-Mail Removed)> wrote in message
news:719B12DE-91E3-48B2-BB28-(E-Mail Removed)...
>I am having a similar problem. How would I add a reference to DAO 3.6
>library?
>
> "Rick Brandt" wrote:
>
>> Max wrote:
>> > I moved all tables/queries/macros/forms from Access97 to Access2000,
>> > when I ran the compact repair tool, it gave me a compile error in the
>> > line
>> >
>> > DIM dbs as database
>> >
>> > What should I do?
>>
>> Add a reference to the DAO 3.6 library. Access 97 has a reference ot DAO
>> by
>> default whereas Access 200 does not. If you had simply used Access 2000
>> to
>> convert the file this would have been done for you.
>>
>> --
>> I don't check the Email account attached
>> to this message. Send instead to...
>> RBrandt at Hunter dot com
>>
>>
>>