Cita:
Iniciado por David el Grande 
¿Cómo te estás conectando a la base de datos?
mediante esto, no tengo problemas de conexion:
Data1.DatabaseName = "c:\sid\bdic.mdb"
Data1.RecordSource = "alumnos"
Set bd = OpenDatabase("c:\sid\bdic.mdb")
Set cesar = bd.OpenRecordset("alumnos", dbOpenDynaset)
Set tb = bd.OpenRecordset("alumnos", dbOpenDynaset)
solo quiero pasar los registros de la BD a un listbox