DoCmd.OpenForm и Form_Error

mift

Такое дело.Есть форма, на ней починеная с данными. На подчиненой стоит обработчик Form_Error. Если у пользователя прав нет на данные, то срабатвает Form_Error и там внутри обрабатывается ошибка, выводится сообщение, что прав нет и все закрывается.Если запускать форму по двойному клику на окошке базы или если поместить кнопку на тулбар - все нормально. Но если запускать такую форму через DoCmd.OpenForm, то почему-то не срабатывает Form_Error на подчиненyой и форма не ругается, а просто подчиненая не отрисовывается - пустое место. Как сделать так, что-бы и здесь возникала Form_Error?
6 ответов

mift

никто не сталкивался?


mift

А ты пошагово проверь код. И посмотри почему перескакивает или игнорирует твой MsgBox.Было бы не плохо выложить тебе код с подчиненной формой.


mift

ну вот код (убрал все лишнее :))
Option Compare Database

Private Sub Form_Error(DataErr As Integer, Response As Integer)
 MsgBox "Form_Error"
End Sub


mift

Повесь обработчик на открытие формы !


mift

добавил - все тоже


mift

Все зависит от того, откуда ты вызываешь данную Form_Error, возможно стоит вставить процедуру вызова на открытие или загрузку формы через конструктор