Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Set db = CreateDatabase(new_database, dbLangGeneral, dbVersion40)
Set accapp = New Access.Application
PrevSetting = accapp.GetOption("Default File Format")
accapp.SetOption "Default File Format", 9 ' set default format to 2000
accapp.OpenCurrentDatabase new_database
accapp.CloseCurrentDatabase
accapp.SetOption "Default File Format", PrevSetting ' reset it to current format
Set accapp = Nothing