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

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

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


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

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
| Ответить | Цитировать | Написать  
16.09.2004, 08:58:26
    #32696829
Hummer
Hummer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
События при удалении записи в форме проекта ADP (Access 2K)
2 Pavel
Ага. Придётся. Или после посыла делете - в хп к примеру что-либо ожидать - т.е. переносить это событие на сервер - но не всегда удобно да....

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

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
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / События при удалении записи в форме проекта ADP (Access 2K) / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 344ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1671732]:
 0ms
get settings:
 7ms
get forum list:
 20ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 35ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 52ms
get tp. blocked users:
 2ms
others: 208ms
total:  344ms
x
x
Закрыть


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