Check for empty recordset 2

[perrymans]

How do you check to see if a recordset is empty and then do X based on that result?

Thanks. Sean.

 

[PHV]

Have a look at the .BOF and .EOF properties of the Recordset object.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[ZmrAbdulla]

[tt]DCount()[/tt] also may be an alternative.

________________________________________________________
Zameer Abdulla
Help to find Missing people
All cats love fish but fear to wet their paws..

 

[Ravenous1]

Like PHV said:

Dim rs As DAO.Recordset
Dim db As DAO.Database
Dim strSQL As String

strSQL = "SELECT * FROM Orders o WHERE o.[OrderID] = 9999"

Set db = CurrentDb

Set rs = db.OpenRecordset(strSQL)

If (rs.BOF And rs.EOF) Then
MsgBox "rst empty..."
End If

 

[perrymans]

Thanks guys, any difference between using DCount or BOF/EOF?

Sean.

 

[LonnieJohnson]

BOF and EOF apparently use more lines of code, but use less system resources. Depending upon the size of your table DCount could take longer to respond with your answer.

ProDev, MS Access Applications
Visit me at ==>

http://www.prodev.us

May God bless you beyond your imagination!!!