1: 2: 3: 4: 5: 6:
' código abajo abre la base de datos externa Fijar el acObj = CreateObject (“Access.application”) acObj.OpenCurrentDatabase CurrentProject.Path y “\ DatabaseB.mdb” acObj.Visible = verdad acObj.UserControl = verdad acObj.DoCmd.Maximize