please help me locate issue in following code.....
Dim Records As DAO.Recordset
Dim Records1 As DAO.Recordset
Set Records1 = CurrentDb.OpenRecordset("Select ID, Paid From RentInvoice where ID = " & Me.Text6, dbOpenDynaset, dbAppendOnly)
Debug.Print ID, paid
With Records1
Records1.Edit...