I use two combos to contain members' name and assessment date, and execute a command botton with the following code:
Private Sub Command159_Click()
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "EngName] = '" & Me![cboEngName] & "'" And "[AssessDate] = '" & Me![cboAssessDate] & "'"
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
But it can't work, can anyone help?
Many thanks in advance.
Private Sub Command159_Click()
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "EngName] = '" & Me![cboEngName] & "'" And "[AssessDate] = '" & Me![cboAssessDate] & "'"
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
But it can't work, can anyone help?
Many thanks in advance.