Test recordset for emptiness 1

[projecttoday]

How do test a recordset if it's empty or not? Let's say you have

SQLstr = "SELECT ...
Set rs = db.OpenRecordset(SQLstr)
rs.MoveFirst

If rs is empty you will get an error on rs.MoveFirst. How do you test for that?


Robert

 

[PWise]

if rs.bof and rs.eof
msgbox "Recordset empty!"

else
rs.MoveFirst
end if

 

[dhookom]

Forgot the "Then".

if rs.bof and rs.eof Then
   msgbox "Recordset empty!"
else
   rs.MoveFirst
end if

Duane MS Access MVP
Now help me support United Cerebral Palsy

 

[PHV]

You may also test the rs.RecordCount property.

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886