DAO Help

[mik706]

I am trying to to read from an Access database using the following code:

Dim Dbs As Database
Dim Rst As Recordset

'Open Database
Set Dbs = OpenDatabase(App.Path & "\DB.mdb")
    
'Get list of all in table
Set Rst = Dbs.OpenRecordset("TABLE1")

But i am getting an Error - Runtime Error 13 Type Missmatch when i try to open a record set.

i have used this method before with no problems, the only difference now is i am using Access2000 could this be the problem?

do i need a new DAO control (I am using DAO3.6)

[Frans C]

Could it be that you have references to both DAO as ADO?
Try if specifying a specific DAO recordset helps.

Dim Rst As DAO.Recordset

[swatty]

Dao 3.6 will do.

[mik706]

Cheers Frans C Problem Solved.