Problema en cadena de conexión driver

Gracias Xavi.
Solo una consulta cual es el dll que debo activar,desde la venta herramienta.

Buenas tardes.
Tengo la siguiente cadena de conexion.

Dim Rs as Adodb.Recordset
Dim Bs as adodb.Connection
Dim Sql as String
Dim Cadena as String

Cadena="driver={microsoft access driver (*.mdb)}; &
"dbq=d:\base\modulo.mdb"

Set Bs= New ADODB.Connection
Bs.Open Cadena

Set Rs= New ADODB.Recorset

Sql="select nombre from cliente"

Rs.open sql,Bs, adopenDynamic,adlockOptimistic

cuando lo ejecuta el error se me da en el Bs.open Cadena

Se producido error '-2147467259(80004005)' en tiempo de ejecución:

No se encuentra el nombre del origen de base datos y no se aplico ningún controlador.

Ya vi el odbc y se identifican los driver y controladores.
No se si se deben de desinstalar e instalar de nuevo.

Gracias por el apoyo.