Conectar a Access97 con DAO desde .NET

[moNTeZIon]

Buenas a todos.
Necesito conectarme a una BD de Access97 a través de DAO.
Para ello, en mi proyecto, he agregado una referencia a "Microsoft DAO 3.6 Object Library" y luego el siguiente código:

Código:

Dim Dbe As DAO.DBEngineDim Db As DAO.Database
Dim Rs As DAO.Recordset
Dbe = New DAO.DBEngine() '--> ERROR!!!
Db = Dbe.OpenDatabase("Ruta de la BD\Nombre.MDB")
Rs = Db.OpenRecordset("SELECT * FROM Articulos")

Al llegar a la línea marcada como ERROR!!!, me suelta el siguiente Error:

Código:

Error al crear una instancia del componente COM con CLSID {00000010-0000-0010-8000-00AA006D2EA4}
desde IClassFactory debido al siguiente error: 80040112
-

Cualquier comentario me sería de ayuda.
Gracias por vuestras opiniones.
Un saludo!

[jcalcalde]

Buenas, por que queres conectar con dao si lo podes hacer con ado y te
recomiendo que no utilices el acceso por net y no por com

Juan Carlos

[moNTeZIon]

Buenas y gracias.
Con ADO.NET es como lo hago. El objetivo es conectarme a una BD Access97 de una aplicación de gestión antigua. La conexión por ADO.NET que realizo, requiere que todos los usuarios salgan de la aplicación, entonces, mi aplicación, que no hace más que consultas a la BD y exportar a Excel, funciona bien. Pero el requerimiento es drástico.
Los fabricantes de la aplicación me han dicho algo como que puedo seguir el siguiente esquema:

- Abrir Conexión con DAO
- Abrir Conexión con ADO.NET y realizar las consultas.
- Cerrar Conexión ADO.NET
- Cerrar Conexión DAO

Bueno, de los dos últimos no estoy seguro del orden. Pero lo tengo en el mail de ellos.
Ahora ya, es cuestión de intentar implementar esto y probar lo que dicen y ahí me quedé.
Si tienen cualquier otra idea, sabiendo el problema que tengo, bienvenida sea.
Gracias!
Un saludo!

[moNTeZIon]

Haciendo pruebas cambiando las referencias entre "Microsoft DAO 3.6 Object Library", "Microsoft DAO 3.51 Object Library" y "Microsoft DAO 2.5/3.51 Compatibility Library" siempre obtenía el mismo error.

Finalmente, me ha funcionado correctamente, dejando únicamente la referencia "Microsoft DAO 3.6 Object Library" y el siguiente código:

Código:

Dim dBe As New DAO.DBEngine
Dim dB As DAO.Database = dBe.OpenDatabase(Entorno.RutaBD)

El porqué, sigue siendo un misterio...
Un saludo!