错误2115在Access 2016

Question

我有一个错误：

Run-time error 2115

The macro or function set to the BeforeUpdate or ValidationRule property for this field is preventing Microsoft Access from saving the data in the field.

的代码如下，并访问打破了调试第2行：

Set rs = db.OpenRecordset("Select * from TransactionsC Where IDClient = '" & Extract & _ 
          "' Order by IDTransaction DESC") 
Set Me.EditTransactionsC_subform.Form.Recordset = rs 
Me.EditTransactionsC_subform.Form.Requery 
Set rs1 = db.OpenRecordset("Select Filed, Year, Notes from ClientNotes Where IDClient = '" & _ 
          Extract & "' Order by Year DESC") 
Set Me.ClientNotes_subform.Form.Recordset = rs1 
Me.ClientNotes_subform.Form.Requery 

我想不出什么错误是。

Answer 1

无需打开并设置记录集对象变量。

Me.EditTransactionsC_subform.Form.RecordSource = "SELECT * FROM TransactionsC WHERE IDClient = '" & Extract "' ORDER BY IDTransaction DESC;"

但为什么改变RecordSource属性？建议使用Filter和FilterOn属性或DoCmd.FindRecord。