Лох ПозорныйС тем, что удаление записи выполняется в неявной аксесовской транзакции, а реквери в транзакциях не поддерживается. вот и все.
В одной из форм у меня такой код вполне работает
1.
2.
3.
4.
5.
6.
7.
8.
Private Sub Form_Delete(Cancel As Integer)
Dim SQLStr As String
Cancel = True
If MsgBox("Подтвердите удаление сервиса '" & Me!fld_Name & "'", vbOKCancel, "Удаление") = vbOK Then
SQLStr = "UPDATE __TEMP_RESEPT_ORD_CALC_tmp as a SET a.cl_DELETED = True where operid = " & Me!OperID & ""
CurrentDb.Execute SQLStr
Forms!прием_заказ.Requery
End If
End Sub
---
Если обновлять нельзя, то как тогда быть?
