powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / События при удалении записи в форме проекта ADP (Access 2K)
6 сообщений из 6, страница 1 из 1
События при удалении записи в форме проекта ADP (Access 2K)
    #32696594
Фотография Pavel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
За 5 лет работы с adp так и не заметил, что вся цепочка событий связанных с удалением записи в форме проекта adp отрабатывает до отправки на сервер DELETE. Фигня какая! Просто на форме запрет добавления, и после удаления последней записи current не отрабатывает, а нужно обновить данные в другой форме именно после удаления записи на сервере. Бардак! Порешал конечно, но изврат это...
Или я ошибаюсь, есть нормальное решение?
...
Рейтинг: 0 / 0
События при удалении записи в форме проекта ADP (Access 2K)
    #32696693
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А с удалением у аксеса совсем беда
Я давно кричу, что нужны события BeforeDelete и AfterDelete, по аналогии с BeforeUpdate и AfterUpdate
Но видимо кричу недостаточно громко. Мелкомягкие меня не слышат. Есть только Delete, который отрабатывает до удаления (независимо от того - adp или mdb), и еще не факт что удаление произойдет (зависит от настроек аксеса и реакции пользователя)
...
Рейтинг: 0 / 0
События при удалении записи в форме проекта ADP (Access 2K)
    #32696713
Фотография Victosha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В общем, это не обязательно смертельно...
у АДО рекордсета, например, есть RecordsetChangeComplete и WillChangeRecordset

а у АДО коннешна WillExecute и ExecuteComplete

правда, применительно к "чисто акцессным" CurrentProject.Connection вряд ли я бы стал на них пролагаться...


(с выражением лица)
...
Рейтинг: 0 / 0
События при удалении записи в форме проекта ADP (Access 2K)
    #32696733
Фотография Pavel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да это понятно:

Private WithEvents rs As ADODB.Recordstet

Set rs = Me.Recordset

Private Sub rs_RecordsetChangeComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
...

Короче класс писать придется...
...
Рейтинг: 0 / 0
События при удалении записи в форме проекта ADP (Access 2K)
    #32696829
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Pavel
Ага. Придётся. Или после посыла делете - в хп к примеру что-либо ожидать - т.е. переносить это событие на сервер - но не всегда удобно да....

В общем, велком то .NET
...
Рейтинг: 0 / 0
События при удалении записи в форме проекта ADP (Access 2K)
    #32699073
aleks2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А по-простому не пойдет?

Private Sub Form_Delete(Cancel As Integer)
Cancel = True
On Error GoTo ErrDelete
'<делаем, что надо>
Me.Recordset.Delete
'<делаем, что надо>
Me.Recordset.Refresh
exit Sub
ErrDelete:
Msg "Хрен, а не удаление!"
End Sub
-------------
Для мультиселекта немного сложнее, но можно.
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / События при удалении записи в форме проекта ADP (Access 2K)
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]