Anónimo
Abrir bd access con botón desde otra bd access
Hola, tengo una duda a ver si me podéis echar una mano.
Estoy creando un formulario y quiero poner un botón que en el evento click, me abra otra bd de access (o sea, otro archivo mdb). He intentado con el asistente y sólo lo hace para word y excel, y también lo he creado para abrir una aplicación, pero sólo busca archivos exe. Le he forzado para que coja ese archivo mdb pero no hay manera.
Saludos y gracias de antemano
Estoy creando un formulario y quiero poner un botón que en el evento click, me abra otra bd de access (o sea, otro archivo mdb). He intentado con el asistente y sólo lo hace para word y excel, y también lo he creado para abrir una aplicación, pero sólo busca archivos exe. Le he forzado para que coja ese archivo mdb pero no hay manera.
Saludos y gracias de antemano
1 respuesta
Respuesta de Neckkito Nck
1
A veces Access tiene cosas un poco "extrañas": unas cosas que parecen complicadas son simples y otras que parecen simples son complicadas ;)
He dado por supuesto que querías abrir una BD en concreto. Si quieres poder tú seleccionar qué BD abrir la cosa se complica un poquito. Si con el truco que te paso te basta, perfecto; si no tendría que explicarte unas cuantas cosas más.
Te paso este truco muy fácil para abrir otra BD. En el evento que comentabas del botón generas código y le escribes lo siguiente:
---
Private Sub Comando0_Click()
Dim path As String
path = "C:\MiBd.mdb"
Application.FollowHyperlink path, , False
End Sub
---
Sólo tienes que cambiar el valor de path con la dirección donde tengas la BD que quieres abrir.
Ya me dirás cosas de cómo te ha ido. Ante cualquier duda me comentas ;)
He dado por supuesto que querías abrir una BD en concreto. Si quieres poder tú seleccionar qué BD abrir la cosa se complica un poquito. Si con el truco que te paso te basta, perfecto; si no tendría que explicarte unas cuantas cosas más.
Te paso este truco muy fácil para abrir otra BD. En el evento que comentabas del botón generas código y le escribes lo siguiente:
---
Private Sub Comando0_Click()
Dim path As String
path = "C:\MiBd.mdb"
Application.FollowHyperlink path, , False
End Sub
---
Sólo tienes que cambiar el valor de path con la dirección donde tengas la BD que quieres abrir.
Ya me dirás cosas de cómo te ha ido. Ante cualquier duda me comentas ;)