RE:ABRIR VARIAS BASES DE DATOS MDB
Hola como estas
Lo que podes hacer es declarar varias variables de conexion, si es que necesitas tener dos bases abiertas al mismo tiempo (en caso de una migracion por ej), de etse modo
Global Conn As New ADODB.Connection
Global Conn1 As New ADODB.Connection
Global Conn3 As New ADODB.Connection
....
....
...
Global ConnN As New ADODB.Connection
cada una de estas variables va a corresponder a una conexion distina. Lo que vas a tener que cambiar luego va a ser el string de conexion, de esta forma
'Conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C: est.mdb"
'Conn1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C: est2.mdb"
'Conn3.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C: est3.mdb"
.....
....
....
'ConnN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C: estN.mdb"
Cada linea de conexion se va a corresponder con la variable de tipo conexion que declaraste. Este es en caso de que quieras mantener varias conexiones simultaneas. Una vez declarado esto podes hacer algo asi para ejecutar una consulta
/*** Seleccionas la DB Test
'Conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C: est.mdb"
/***Abris la conexion de la DB Test
Conn.open
/***Seleccionas la DB Test1
'Conn1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C: est1.mdb"
/***Abris la DB Test1
Conn1.open
Si necesitas insertar datos de una tabla a otra que esta en una DB distinta, vas a tener que declarar dos RecordSet's e insertarlos con una consulta
Cualquier duda a la orden y espero que esto te haya ayudado
Saludos dese Argentina