How can I create an Access instance with VBA and leave it open?

Question

Here's a piece of vbs code that creates an Access database.

option explicit

dim accessFile
dim acc
dim fso

accessFile = "c:\users\rene.nyffenegger\documents\tq84.accdb"

set fso = createObject("Scripting.FileSystemObject")

if fso.fileExists(accessFile) then
   fso.deleteFile(accessFile)
end if

set acc = createObject("Access.Application")

acc.newCurrentDatabase accessFile, 0

acc.visible = True

When started on the command line (u:\> createDB.vbs), the Access database is created. Yet, when the script exits the Access application is closed as well. I'd rather have the application stay open after creation. Is this somehow possible?

user20416 · Accepted Answer · 2016-03-29 10:50:06Z

1

Try setting the Application's UserControl property to True.

Set acc = CreateObject("Access.Application")
acc.NewCurrentDatabase accessFile, 0
acc.Visible = True
acc.UserControl = True

answered Mar 29, 2016 at 10:50

user20416

15.5k9 gold badges76 silver badges149 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

How can I create an Access instance with VBA and leave it open?

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related