Visual Basic - DBENGINE (Se requiere un objeto)

al poner:

On Error GoTo Err_Compactar

DBEngine.RepairDatabase "database.mdb"
On Error GoTo 0
MsgBox "¡Fin del procedimiento reparar!"

Me da un error en tiempo de ejecución y me dice que se requiere un objeto. no se que puede ser.Alguien me puede ayudar?

Creo q no he de definir nada antes no? ya que la DB debe estar cerrada, por eso no hagoi ni DIM DBS AS DATABASE ..... etc...
Es correcto?

DBEngine es un objeto que pertenece a un objeto superior que es Application y a su vez y en este caso debe pertenecer a una instancia de Access.

Debes hacer lo siguiente

Dim oAccess As Access.Application

Set oAccess = New Access.Application
oAcess.DBEngine.RepairDataBase "Tumdb.mdb"

Para usar esta jerarquia de clases debes crear la referencia a la Biblioteca de objetos de Access

Saludos

Merci pero, al poner Dim oAccess As Access.Application me dice que da un error de compilación diciendo que el tipo no está definido por el usuario. Que me falta alguna componente?

Solucionado, era cosa de las referencias. No tenia puesto nada de ACCESS. Gracias

Como lo solucionaste porfa , yo tengo el mismo problema

Hola, muchas gracias por su ayuda, puse la referencia y no da error pero cuando quiere ejecutar oAccess.DBEngine.RepairDataBase "Cuentas.MDB" me dice que :Error 3251 en tiempo de ejecucion : Operacion no valida para este tipo de objeto.

Alguien sabe porque ?????
Muchas gracias.