Wie kan mij helpen om de window waar deze test.mdb wordt geopend standaard in maximale window te openen?
Docmd.maximize werkt natuurlijk niet maar wellicht hebben jullie betere ideeen.
Ik heb via Google de volgende code gevonden echter opent deze standaard verklein modus ivp uitvergroot of gemaximaliseerd.
Dim LPath As String
Dim LCategoryID As Long
LPath = "C:\test.mdb"
Set oApp = CreateObject("Access.Application")
oApp.Visible = True
oApp.OpenCurrentDatabase LPath
DoCmd.Quit
Docmd.maximize werkt natuurlijk niet maar wellicht hebben jullie betere ideeen.
Ik heb via Google de volgende code gevonden echter opent deze standaard verklein modus ivp uitvergroot of gemaximaliseerd.
Dim LPath As String
Dim LCategoryID As Long
LPath = "C:\test.mdb"
Set oApp = CreateObject("Access.Application")
oApp.Visible = True
oApp.OpenCurrentDatabase LPath
DoCmd.Quit