Hello friends,
My latest problem ... I get the error:
Run-time error '3800':
'contactID' is not an index in this table.
Here is my code:
Dim myDB As Database
Dim myRS As Recordset
Set myDB = CurrentDb
Set myRS = myDB.OpenRecordset("tblContact", dbOpenTable)
myRS.Index = "contactID"
myRS.Seek "=", Me.rs_contactID
myRS.Edit
myRS!cont_last_contacted = Date
myRS.Update
myRS.Close
contactID is the primary key for tblContact. What is the the trick to getting this to work! THANKS to anyone who can help me.
My latest problem ... I get the error:
Run-time error '3800':
'contactID' is not an index in this table.
Here is my code:
Dim myDB As Database
Dim myRS As Recordset
Set myDB = CurrentDb
Set myRS = myDB.OpenRecordset("tblContact", dbOpenTable)
myRS.Index = "contactID"
myRS.Seek "=", Me.rs_contactID
myRS.Edit
myRS!cont_last_contacted = Date
myRS.Update
myRS.Close
contactID is the primary key for tblContact. What is the the trick to getting this to work! THANKS to anyone who can help me.