RE:base de datos con contraseña
me inmagino que estas usando el crviewer, entonces antes de mostrar el reporte le tenes que cambiar la ruta de la base de datos a a cada tabla y declarar las siguientes variables, pero fijate que yo le quite la contraseña porque me da problemas, pero en access hay una opcion en herramientas, seguridad, cuentas de usuario y grupos, Cambiar contraseña de inicio de sesion, y alli le pones una contraseña al administrador, y usas esa mejor, yo esa es la solucion que encontre porque con la contraseña de la base de datos da problemas, y pues cuando querras abrrir la base de datos te va a pedir la contraseña de adminsitrador para entrar, probalo.
Private BasedeDatos As CRAXDRT.Database
Private Tablas As CRAXDRT.DatabaseTables
Private Tabla As CRAXDRT.DatabaseTable
Set BasedeDatos = Reporte.Database
Set Tablas = BasedeDatos.Tables
Cont = 1
For Each Tabla In Tablas
Tabla.SetDataSource "c:\ mi tabla.mdb"
Cont = Cont + 1
Next Tabla