I am implementing search functionality with the findnext/findfirst method. I want the search to finish when the end of the recordset has been reached. The below code, "loop while rs.EOF = false" statement, won't work. For the sake of simplicity I am not including the findfirst section of the code. What am I missing here?
Dim rs As dao.Recordset
Set frm = Forms!frmMyForm
Set rs = frm.RecordsetClone
do
rs.findnext "[FIELDNAME] LIKE '*StringToBeSearched*' 'this works okay
If rs.NoMatch = False Then
Forms!frmalldams.Bookmark = rs.Bookmark
End If
loop while rs.EOF = false 'this never works. rs.EOF is always false
'even though access starts at the first record when the end is reached