我正在尝试从 VBA 中的当前 Access 数据库中删除每条记录,其中OTP = txtOTP.value
和VARIABLE = {NomAdminContrats,TelAdminContrats,TelecAdminContrats, [...]}
这是我的代码:
Dim query As Recordset
Set query = CurrentDb.Execute("DELETE * FROM tb_SOMMAIRE WHERE OTP = '" & txtOTP.value & "' AND (VARIABLE = 'NomAdminContrats' or VARIABLE = 'TitreAdminContrats' or VARIABLE = 'UnitAdminContrats' or VARIABLE = 'AdrAdminContrats' or VARIABLE = 'VilleAdminContrats' or VARIABLE = 'TelAdminContrats' or VARIABLE = 'TelecAdminContrats' or VARIABLE = 'CourrielAdminContrats')")
尝试使用 OpenRecordset 或使用 Execute 时出现预期函数时出现错误 3219 Invalid Operation 。我已经尝试了很多东西,但我还没有设法让这个查询工作。我在记录集中也有完整的表,使用 myRecordset.Delete 会更容易/更快吗?如果是这样,我该怎么做?
编辑
现在尝试使用 CurrentDb.Execute 而不是 CurrentDb.OpenRecordset。该错误现在是Function expected而不是Invalid Operation。