В старом приложении .mdb было следующее событие кнопки, после чего выбранная запись на форме удалялась в таблице.

Private Sub Btn_RemoveSubAsst_Click()

If Me.[Sub_Assets1].Form.Recordset.RecordCount = 0 Then
MsgBox "There are no Devices to remove"
Else
CurrentDb.Execute ("DELETE * FROM Container WHERE SubAsset =" & Me![Sub_Assets1].Form.[SubAsset] & ";")
End If

End Sub


Сделал аналогичную кнопку на форме с тем же кодом в проекте .adp, но записи не удаляются. Показывает ошибку на строку Current.db.Execute
Как написать правильней?

Алексей спасибо! Заработала.
А как переделать вот этот код:

If Me.[Sub_Assets1].Form.Recordset.RecordCount = 0 Then
MsgBox "There are no Devices to remove"

Если в субформе формы уже нет в списке элементов, то должна выходить запись "There are no Devices to remove". Включаю, но ничего не показывает, и ошибку тоже.
Спасибо.