1: 2: 3: 4: 5: 6:
' der folgende Code class= " öffnet die externe Datenbank acObj = CreateObject („Access.application“) einstellen acObj.OpenCurrentDatabase CurrentProject.Path u. „\ DatabaseB.mdb“ acObj.Visible = richten aus acObj.UserControl = richten aus acObj.DoCmd.Maximize