2015-09-28 1 views
1

В Access 2013 (64-разрядная версия) Я открываю другую базу данных (db2), когда пользователь нажимает кнопку на форме в db1. Это работает. Однако, когда он открывает db2, я получаю предупреждающую панель «Предупреждение о безопасности: некоторые активные материалы были отключены. Нажмите для получения более подробной информации» с помощью кнопки для включения содержимого. Это раздражает, и когда я открываю базу данных из db1 с открытыми формами, когда я нажимаю кнопку, чтобы включить контент, все открытые в настоящее время формы закрываются.Как разрешить базам данных запускать содержимое ActiveX при открытии с помощью VBA?

Обе базы данных находятся в одном каталоге, и я добавил этот каталог в надежные местоположения. Есть ли что-то еще, что мне нужно сделать, чтобы отключить эту панель предупреждений без автоматического доверия ко всем базам данных (чего я не хочу делать)?

Когда я вручную открывать каждую базу данных, я не вижу предупреждение бар появляется, так что я предполагаю, что это что-то делать с кодом VBA я использую:

Dim db2 As Variant 
Set db2 = CreateObject("Access.Application") 
db2.OpenCurrentDatabase "NewDb.accdb"  
db2.DoCmd.OpenForm "_View" 
db2.DoCmd.OpenForm "_Home" 
db2.UserControl = True 
+0

Вы видите какую-либо разницу в этом изменении? 'db2.OpenCurrentDatabase CurrentProject.Path &" \ NewDb.accdb "' – HansUp

+0

Вау, да, я делаю! Напишите это как ответ, и я соглашусь! – user3791372

ответ

1

Включить полный путь к NewDb.accdb при звонке OpenCurrentDatabase. Я думаю, что вам нужна такая же папка, как и первая база данных (db1). CurrentProject.Path предоставит вам полный путь к этой папке ...

db2.OpenCurrentDatabase CurrentProject.Path & "\NewDb.accdb" 
+0

Важной частью для дома является то, что, указав полный путь, он предотвращает предупреждение безопасности, которое отключает отображение «активного» контента (макросы, код vba и т. Д.). – user3791372

+0

Неужели я ошибался? Я предположил, что без указания папки вы открываете копию 'NewDb.accdb' из другой папки ... которая не была установлена ​​как надежная папка. – HansUp

+0

Он открыл правильную базу данных (в том же каталоге, что и текущая база данных), но по какой-то причине указание полного пути предотвращает предупреждение о безопасности. Правильный ответ, неправильная причина;) – user3791372

Смежные вопросы