title: Recordset.Update Database or Object is read-only
body: <p>Not sure this is going to work in the specifics I intend. The scenario is the text boxes are populated with data from a table, and the user edits the records and clicks a button to save. </p>
  
  <pre><code>Dim cdb As DAO.Database, rstEdit As DAO.Recordset
  Set cdb = CurrentDb
  DataValues = "SELECT * FROM Companies, Link_Table WHERE Companies.CompanyID =  " &amp; SelectedValue &amp; ";"
  Set rstEdit = CurrentDb.OpenRecordset(DataValues, dbOpenSnapshot)
  
  With rstEdit
   OldCompanyName = !CompanyName
   OldCompanyDescription = !Description
   OldFriendlyName = !FriendlyName
   OldAddressLine1 = !AddressLine1
   OldAddressLine2 = !AddressLine2
   OldAddressLine3 = !AddressLine3
   OldTown = !Town
   OldPostcode = !AddressPostcode
   OldCounty = !AddressCounty
   OldMainTelephone = !MainTelephone
   OldMainEmail = !MainEmail
   OldWeb = !WebAddress
  </code></pre>
  
  <p>'Not sure this is necessary. It was quoted in the example, but unsure why? ^'</p>
  
  <pre><code> !CompanyName = NewCompanyName
   !Description = NewCompanyDescription
   !FriendlyName = NewFriendlyName
   !AddressLine1 = NewAddressLine1
   !AddressLine2 = NewAddressLine2
   !AddressLine3 = NewAddressLine3
   !Town = NewTown
   !AddressPostcode = NewPostcode
   !AddressCounty = NewCounty
   !MainTelephone = NewMainTelephone
   !MainEmail = NewMainEmail
   !WebAddress = NewWeb
   .Update
  End With
  </code></pre>
  
  <p>However, on clicking the save button, it errors stating that the Database or object is read only, and I'm unsure why. As far as I know it isn't open anywhere, nor should it get opened for any reason! Was hoping someone would be able to shed some light on the issue. The table has a primary key set, which is CompanyID however this isn't used in the routine. </p>