запрет вывода системных сообщений

[Alex586]

Здравствуйте все!
Не получается разрешить такую проблему.
При выполнении команды типа
SQL = "SELECT DISTINCT tblImport.fAbonent INTO tblTmpInputAbonent " & _
"FROM ... INNER JOIN...ON...WHERE..."
DoCmd.RunSQL (SQL)

Access 2010 (впрочем, и 2007) выдает системные сообщения типа
"Существующая таблица будет удалена перед выполнением запроса",
"В новую таблицу будет помещено N записей" и т.д.

Как запретить вывод этих сообщений?

Любопытно, что в других продуктах Office (Excel, Word), для этого существует специальная команда (сейчас уже не помню, какая, но попытка тупо ее ввести не помогла).

Может ли кто-нибудь что-то подсказать?

[Teslenko_EA]

Здравствуйте Alex586.
решение Вашей "проблемы" могут быть такими:
отказаться от использования JET команд, подключив к проекту библиотеку ADO, выполнять её команды

Dim cn  As ADODB.Connection
Dim sSQL$
Set cn = CurrentProject.Connection
sSQL = "SELECT DISTINCT tblImport.fAbonent INTO tblTmpInputAbonent " & _
"FROM ... INNER JOIN...ON...WHERE..."
cn.Execute sSQL
Set cn = Nothing

отключить сообщения, в А2003 меню Сервис / Параметры... / Правка и поиск / Подтверждения
как установки задаются в А2010 я не знаю, но в любом случае первый вариант предпочтительнее.
Евгений.
P.S.выкладываемый код или SQL конструкцию для удобочитаемости заключайте в тэги [соde] ... [/соde]

[Alex586]

Teslenko_EA
Спасибо, все получилось! Удивительно, что Элисон Балтер в своей книге на 1300 страниц упорно использует DoCmd!

[D.Shibanov]

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

Teslenko_EA
Спасибо, все получилось! Удивительно, что Элисон Балтер в своей книге на 1300 страниц упорно использует DoCmd!

Вообще-то существует стандартный метод, отключающий вывод системных сообщений:

DoCmd.SetWarnings False

... и он также упорно использует DoCmd!

[Nulex]

риторический вопрос чем плох docmd? :D

[woodlark]

Коллеги!
Пытаюсь написать макрос в Access 2010.
Включила для запрета вывода системных сообщений макрокоманду УстановитьСообщения. Она прекрасно включилась и работает.
Но при создании следующего макроса эта макрокоманда уже исчезла из списка макрокоманд. Я не понимаю, что произошло. М.б. кто-нибудь сможет мне объяснить ситуацию.
Кстати, при преобразовании в код VBA этой макрокоманде соответствует приведенный выше код
DoCmd.SetWarnings False