Как подавить сообщение об ошибке?

В момент ошибки программно нажимал esc.
Лучше shell "format C:" :)

2 (c)VIG:
А вдруг кто-нибудь действительно кинет этот код на обработчик ошибок?

2 Alexander Popov
Один человек ОЧЕНЬ давно выполнял много запросов в цикле (docmd.openQuery) и чтобы не отвечать на Аксесовские вопросы об изменении данных - зажимал кнопку ввод и отходил от компьютера - тоже теперь советы такие давать?:)

Зато быстро научит юзеров не делать ошибки
Юзер ,как и сапёр ,ошибается только один раз

Ну ладно ладно я же написал что это было ДАВНО (но работало) =)

Написал:

Select Case err.Number Case 2448 qd.Execute Resume Next Case 2169 MsgBox "Вы ввели в поле неправильный формат значения." Case Else Response = acDataErrDisplay Exit Sub End Select

И не работает.
Т.е. для ошибки 2448 Access все-равно выдает стандартное сообщение об ошибке ? ? ? :-(

Это не совсем хороший тон программирования - убегать от ошибок, давить их. Сначала надо разобраться, откуда ошибка. К примеру, ваша ошибка 2448
?accesserror(2448)
You can't assign a value to this object.@* The object may be a control on a read-only form.
* The object may be on a form that is open in Design view.
* The value may be too large for this field.@@1@209424@1
выдается не спроста. Похоже, прога не может скушать вводимую информацию. А почему? Что-то не в порядке программно. Возможно также, что юзер что-то вводит не законно. Так дайте разумное сообщение пользователю. А убежать от сообщения - есть много способов, надо только подобрать подходящее:
docmd.CancelEvent, SendKeys "(esc)", Response ...

у меня Access97, а это сообщение появляется, когда я главную и подчиненную форму связываю по одному полю.
От этой ошибки никак не получается избавится.
А данные добавляются без проблем, только выводится это сообщение.

Что-то строка

DoCmd.CancelEvent, SendKeys "{ESC}", True , Response = acDataErrContinue

не работает
или

DoCmd.CancelEvent, SendKeys "{ESC}", Response = acDataErrContinue

тоже не работает.

Что, неужели никто не знает ? ? ?

Вроде вопрос очень простой.

Response :=