ник: joka
спасибо еще раз! все гениальное просто:) этот алгоритм работает!
только еще надо отлов ошибки поставить на Form_Error, чтобы не выскакивало акцесовское предупреждение об ошибке при попытке сохранить (а оно возникает если в бефор_апдайте cancel=true).
что то типа
Private Sub Form_Error(DataErr As Integer, Response As Integer)
Select Case DataErr
Case 2169 'игнорирование ошибки о невозможноси сохранить объект и закрытие базы
Response = acDataErrContinue
End Select
End Sub