A simple piece of code, but "Method or data member not found" error issued on the ".Edit" statement when module compiled (A2003). I'm not seeing the problem. (DAO 3.6 object library is included in the References.) What am I missing?
Thanks,
Bill
Code:
Option Compare Database
Option Explicit
Option Base 1
(snip)
Dim rs As DAO.Recordset ' The Recordset we'll update with the serialization (SerialNo) and booklet sort key.
Dim I As Integer ' Working variable
Dim J As Integer ' Working variable
Dim K As Integer ' Working variable
Dim L As Integer ' Working variable
Private Sub Booklet_Recordset()
Set rs = DBEngine(0)(0).OpenRecordset("QBooklet-RS")
' First serialize the recordset (RecordID's not applicable here)
I = 1
Do While Not rs.EOF
rs!SerialNo.Edit
rs!SerialNo = I
rs.Update
I = I + 1
rs.MoveNext
Loop
rs.Close
Set rs = Nothing
End Sub