Как использовать SetOption, чтобы отключить предупреждающие сообщения в приложении Access

Примечание

Office 365 ProPlus переименован в Майкрософт 365 корпоративные приложения. Для получения дополнительной информации об этом изменении прочитайте этот блог.

Умеренный: требуются базовые навыки макросов, программирования и взаимодействия.

Эта статья относится только к базе данных Microsoft Access (MDB или ACCDB).

Аннотация

В этой статье показано, как использовать метод Application. SetOption, чтобы отключить предупреждающие сообщения в приложении Access.

Дополнительные сведения

Корпорация Майкрософт предоставляет примеры программирования только в целях демонстрации без явной или подразумеваемой гарантии. Данное положение включает, но не ограничивается этим, подразумеваемые гарантии товарной пригодности или соответствия отдельной задаче. Эта статья предполагает, что пользователь знаком с представленным языком программирования и средствами, используемыми для создания и отладки процедур. Специалисты службы поддержки Майкрософт могут объяснить возможности конкретной процедуры, но они не изменяют эти примеры, чтобы предоставить дополнительные функции или создать процедуры для удовлетворения конкретных требований. Запросы на изменение и другие процессы, которые добавляют, удаляют или изменяют данные, обычно представляют пользователю предупреждение о том, что данные будут обновлены. Однако в приложении среды выполнения часто желательно отключить предупреждения, так как проверки и меры предосторожности обычно выходят за рамки элемента управления пользователя.

Это можно сделать с помощью метода Сетварнингс объекта DoCmd, но вы можете отключить предупреждения для всего приложения. Для этого можно использовать метод SetOption объекта Application. Тем не менее, если вы сделаете это, вы также можете включить предупреждения обратно при выходе из приложения.

Для этого в простом приложении с одним приложением выполните следующие действия:

  1. Запустите Access и создайте пустую базу данных с именем Теструн.

  2. Импортируйте таблицу Customers (клиенты) из учебной базы данных Northwind. mdb.

  3. Создайте новую форму в режиме конструктора, а затем добавьте непривязанное поле со списком к разделу сведений.

  4. Задайте следующие свойства для поля со списком:

    Name: cboCountry
    Row Source: SELECT DISTINCT Customers.Country FROM Customers ORDER BY Customers.Country; 
    
  5. Добавьте кнопку в раздел сведения формы и назовите ее Кмдделете.

  6. Присвойте свойству OnClick кнопки Command следующую процедуру обработки события:

    DoCmd. OpenQuery "Криделетекустомерс"

  7. Закройте редактор Visual Basic.

  8. Сохраните форму как Делетекустомерс и закройте ее.

  9. Создайте новый запрос в режиме конструктора, а затем добавьте таблицу Customers.

  10. В Access 2002 или в Access 2003 выберите команду Удалить запрос в меню запрос .

    В Access 2007 нажмите кнопку Удалить в группе тип запроса на вкладке конструктор .

  11. Перетащите звездочку (*) из списка полей в первый столбец бланка запроса, а затем перетащите поле страна во второй столбец.

  12. В строке Условия столбца страна введите следующую команду:

    Формирует! [Делетекустомерс]! [Кбокаунтри]

  13. Сохраните запрос как Криделетекустомерс и закройте его.

  14. Откройте форму Делетекустомерс в представлении формы.

  15. В поле со списком выберите страну, нажмите кнопку и обратите внимание на появившееся предупреждение. В диалоговом окне предупреждения нажмите кнопку нет.

  16. Откройте форму в режиме конструктора, а затем на панели инструментов нажмите кнопку код.

  17. В окне Код введите или вставьте следующие процедуры:

Private Sub Form_Load()

Application.SetOption "Confirm Action Queries", 0
   Application.SetOption "Confirm Document Deletions", 0
   Application.SetOption "Confirm Record Changes", 0

End Sub

Private Sub Form_Unload(Cancel As Integer)

Application.SetOption "Confirm Action Queries", 1
    Application.SetOption "Confirm Document Deletions", 1
    Application.SetOption "Confirm Record Changes", 1

End Sub

  1. Закройте редактор Visual Basic, а затем сохраните и закройте форму.

  2. Откройте форму Делетекустомерс, выберите страну и нажмите кнопку.

    Обратите внимание , что не отображается диалоговое окно с предупреждением.

В этом примере параметры подтверждения приложения отключаются, когда форма Делетекустомерс загружается и повторно включается при выгрузке. В более сложных приложениях вы можете выполнять те же действия в начальной форме или кнопочной форме.