Запрос на создание таблицы

@rvg · Регистрация: 24.08.2014

Студворк — интернет-сервис помощи студентам

Уважаемые форумчане, подскажите как оформить процедуру, чтобы по нажатию кнопки запускался запрос на создание таблицы, но при этом не выходили никакие информационные сообщения.
Если запустить нижеследующую процедуру, то выходят информационные сообщения. Их надо пофиксить.

Visual Basic
1
2
3
Private Sub Кнопка0_Click()
  DoCmd.OpenQuery "z_Visit_1_Previous"
End Sub

Благодарю откликнувшихся )

@snipe · 26.06.2015, 11:33

Visual Basic
1
2
3
4
5
Private Sub Кнопка0_Click()
docmd.Setwarnings false
  DoCmd.OpenQuery "z_Visit_1_Previous"
DoCmd.SetWarnings true
End Sub

@rvg · 26.06.2015, 11:52 **[ТС]**

Спаибки, все работает как надо

mobile · 26.06.2015, 11:54

Сообщение от snipe

docmd.Setwarnings false

Опасный вариант. Если при открытии запроса возникнет ошибка, то юзер так и останется без предупреждений Access. А они полезны во многих случаях. В таких случаях надо проверять ошибку и делать SetWarnings true в любом случае

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Private Sub Кнопка0_Click()
  On Error Goto errend 'проверка ошибок
  docmd.Setwarnings false
  DoCmd.OpenQuery "z_Visit_1_Previous"
errNO:
  DoCmd.SetWarnings true
  Exit Sub
errend:
  Err.Clear       'очистить стек ошибок. В принципе необязательная команда, т.к. Resume чистит кэш
  Resume errNo    'перейти на метку выхода с выполнением SetWarnings true
End Sub

Но вообще-то принято исполняемые запросы (Insert Into, Delete, Select * Into, Update) и запросы DDE (Aiter Table, Create Table, Drop Table) делать даошными методами: Currentdb.Execute. Он не дает предупреждений, если специально не попросить, и не гасит системные.

Новые блоги и статьи Все статьи Все блоги /
Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .

@rvg 165 / 39 / 7 Регистрация: 24.08.2014 Сообщений: 547
	26.06.2015, 11:52 [ТС]
	Спаибки, все работает как надо 0

Запрос на создание таблицы

Решение