Turn Security Warning Off in VBA? 1

[101287]

When I exeucte the following function, when I opened Ms Access the Security Warning pop up requiring from me to select "Open Cancel or More Information". Is there anyway that I can supress that security pop-up?

Public Function ExecuteAccessMacro()

Dim AC As Access.Application
Set AC = New Access.Application
AC.OpenCurrentDatabase ("d:\data\romanla\My Documents\acWkSpace\LRTactical DashBoard_be.mdb")

With AC
.Visible = False
.DoCmd.RunMacro "mcrUploadMilestones"
.Quit
End With

End Function

 

[jrbarnett]

Is this code being run from another instance of Access (ie Access from Access, or Access from VB/VBA in another office app)?

Also, which version of Access?

John

 

[101287]

Yes, the code is run from another instance of access. The version is 2003.

Luis

 

[PHV]

You may try this:
AC.AutomationSecurity = msoAutomationSecurityLow
AC.OpenCurrentDatabase ...

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[101287]

Thank you PHV, you always come to my rescue. But that's a good thing.

Luis

 

[Hap007]

Hi PHV,

I do not know why, but Luis did not give you a star and you certainly deserve one, so here is a Star for you!

Enjoy,
Hap...

Access Developer

http://www.fcs-software.com/fcsaccessdev.html

Access based Accounting Solutions - with free source code
Access Consultants forum

http://www.tek-tips.com/threadminder.cfm?pid=1121

 

[jsteph]

It would be nice if MS was consistent and Outlook's OLE interface supported something like that...
--Jim