Visual Basic - como indicar el acceso a una base de datos de acce

Mi duda es la siguiente, estoy tratando de hacer una agenda, usando para esto acces 2000,
pero en el codigo del recordset no se como inidicarle que es una base de datos de acces 2000,
cuando utilizo acces 97 si funciona, ya instale el service pack para poder utilizar el acces
2000 pero no funciona, si alguien puede orientarme se los voy a agradecer infinitamente,

estoy haciendo algo como esto:

Private Sub Form_Load()
Set misesion = Workspaces(0)
Set bdatos = misesion.OpenDatabase("C:\resp\Based.mdb")
Set Data1 = bdatos.OpenRecordset("datos", dbOpenDynaset)
Data1.MoveLast
Data1.MoveFirst
If Data1.AbsolutePosition <> -1 Then
LNumRegs = Data1.RecordCount
LNumReg = Data1.AbsolutePosition + 1
verdatos
End If
End Sub

de antemano mil gracias,

Que dios los bendiga.

Charless