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

Gyslik.
Дата: 07.06.2004 16:22:41
У меня есть ошибка например № 1111.
И при определенном наборе действий пользователя - выдается сообщение об ошибке.
Как перехватить ошибку таким образом, чтобы никакого сообщения не выдавалось, ни стандартного сообщения Access, ни встроенного моего собщения?

DoCmd.SetWarnings (False) - не помогает.
Владимир Саныч
Дата: 07.06.2004 16:28:08
Form_Error. Ты задаешь этот вопрос уже точно не первый раз (третий или пятый - я не уверен).
Alexander Popov
Дата: 07.06.2004 16:28:29
Точно не помню но кажется я делал так В момент ошибки программно нажимал esc.
Kelme
Дата: 07.06.2004 16:28:41
On error resume next
Gyslik.
Дата: 07.06.2004 16:35:08
2 ВС:
Про Form_Error я помню, мне надо не перехватить ошибку, а избавится от сообщения.
2 ALL - спасибо.

Все оказалось просто.
Hummer
Дата: 07.06.2004 16:47:44
2 Alexander Popov
Просто пять баллов:)

Блин, впору коллекцию самых "мудрых" решений собирать:)
Gyslik.
Дата: 07.06.2004 16:52:00
Очень извиняюсь, но как написать Case на обработку ошибок. Т.е. если такая ошибка, то такое сообщение, если такая, то другое, если 1111, то On error resume next, во всех остальных случаях - стандартные сообщения?

Что-то у меня все время проблемы с синтаксисом.

Private Sub Form_Error(DataErr As Integer, Response As Integer)   
    Const conErrFieldRequiered = 3101
    Select Case (DataErr = 1111) 
    On error resume next
    Case (DataErr = conErrFieldRequiered) Or (DataErr = 2169) Then
        Response = acDataErrContinue
        MsgBox "Вы ввели в поле неправильный формат значения."
    Case
        Response = acDataErrDisplay
    End If
End Sub
? ? ?
Kelme
Дата: 07.06.2004 16:54:57
Примерно так:

    Select Case Err.Number
        Case 3197
            qd.Execute
            Resume Next
        Case Else
            MsgBox Err.Description, vbCritical + vbOKOnly, Err.Number
            Exit Sub
    End Select
Alexander Popov
Дата: 07.06.2004 16:56:06
To Hummer
это было давно и мало того работало!!! В момент перехвата ошибки был код нажатия esc ни сообщения ничего не выскакивало.
Kelme
Дата: 07.06.2004 16:59:28
автор

это было давно и мало того работало!!! В момент перехвата ошибки был код нажатия esc ни сообщения ничего не выскакивало.


можно было сделать так ещё:
установить фокус на кнопку OK (если он на Help) и послать Enter :)