Pablo Tum
08 de Noviembre del 2004

Como conecto una base de datos de access con visual basic 6 usando ado

welfo
08 de Noviembre del 2004

Con la siguiente instruccion, declarala a nivel global para que puedas utilizarla desde cualquier form del proyecto

public bdclientes as database


Utiliza una funcion para no estar escribiendo el codigo siempre

Public Function AbreAccess()

Direccion = App.Path 'app.path = la ruta donde se esta ejecutando el proyecto
If Right(Direccion, 1) <> "" Then Direccion = Direccion + ""
Set bdclientes = OpenDatabase(Direccion + "MIBASE.mdb") 'La intruccion Set es para asignar el nombre de la base de datos

end function


funciona y funciona bien, espero te ayude esto bye