I am using Access 2003 and use the following startup method for Access:
Code: Select all
VBSTART
Const cDatabaseToOpen = "c:\my_dbs\db1.mdb"
On Error Resume Next
Dim AcApp
Set AcApp = CreateObject("Access.Application")
If Val(AcApp.Version) >= 11 Then
AcApp.AutomationSecurity = 1 ' msoAutomationSecurityLow
End If
AcApp.Visible = True
AcApp.OpenCurrentDatabase cDatabaseToOpen
VBEND
This gets rid of the security warning and then runs the database unattended. I need to run a few DBs at the same time in order to run queries that have a limited time to run. Seems I can't set/save the security level to low in my workplace - hence the VB. I've tried to use a macro command to press the button and didn't have any luck.
Anyway, when I try to run a few DBs at the same time the second, third etc fail to open.
Has anybody had the issue and could point me in the right direction? Any help would be greatly appreciated. Thanks.
Planomax