title: Cannot Update. Database or Object is Read-only after Requery
body: <p>Okay, cannot find anything online about this error, so here goes.</p>
  
  <p>Using Access 2003.  I have a form that has a combobox dropdown.  Users choose from the dropdown, and the VBA code looks at a particular table to see if data already exists.  If it finds it, it displays the data associated with the record.  If it does not find it, it adds a new record to the table, then tries to display the new data.  The problem is that when using the following code, it does not display the new data, unless I add in Me.Requery.  However, if I do that, it then gives me the above error if I try to do the same process again.</p>
  
  <p>So, how can I get the data to display after adding without the above error?</p>
  
  <p>Here is the relevant code...</p>
  
  <pre><code>' Find the record that matches the control.
  Dim rs As DAO.Recordset
  
  Set rs = Me.Recordset.Clone
  
  'if no record found, then add a default record
  If IsNull(Combo119) Then
      Set rs = CurrentDb.OpenRecordset("SELECT * FROM [Master Reject Data]")
      rs.AddNew
      rs.Fields("production Date") = Date
      rs.Fields("Work Order #") = Combo119.Column(0)
      rs.Fields("Product Type") = ""
      rs.Fields("Shift") = ""
      rs.Fields("Line") = ""
      rs.Fields("# Produced") = 0
      rs.Fields("Reject Type") = ""
      rs.Fields("Reject Quantity") = 0
      rs.Fields("Reject Category") = "Rejection"
      Dim tRec As Long
      tRec = Combo142.ItemData(0)
      rs.Fields("Report Number") = tRec
      rs.Update
      Me.Requery 'this is the line I added to try to get the data to appear
      Set rs = Me.Recordset.Clone
      rs.FindFirst "[Report Number] = " &amp; tRec 'navigate to the newly added record
  Else
      rs.FindFirst "[Report Number] = " &amp; Nz(Me![Combo119], 0) 'navigate to the record with the requested report number
  End If
  If Not rs.EOF Then Me.Bookmark = rs.Bookmark
  </code></pre>