How do I test if a recordSet is empty isNull

Question

How can you test if a record set is empty           Dim temp rst1 As Recordset         Dim temp rst2 As Recordset          Set temp rst1   db OpenRecordset  SELECT   FROM ORDER DATA WHERE SKUS ORDERED       amp  curSKU1  amp     AND  ORDER       amp  curOrder          Set temp rst2   db OpenRecordset  SELECT   FROM ORDER DATA WHERE SKUS ORDERED       amp  curSKU2  amp     AND  ORDER       amp  curOrder           If IsNull temp rst1  Or IsNull temp rst2  Then MsgBox  null    I m opening up a couple of record sets based on a select statement  If there are no records  will IsNull return true

User · Answer

RecordCount is what you want to use   If Not temp rst1 RecordCount  gt  0

User · Answer

If Not temp rst1 Is Nothing Then

User · Answer

If temp rst1 BOF and temp rst1 EOF then the recordset is empty  This will always be true for an empty recordset  linked or local

User · Answer

A simple way is to write it    Dim rs As Object Set rs   Me Recordset Clone If Me Recordset RecordCount   0 then  checks for number of records    msgbox  There is no records   End if

User · Answer

I would check the  End of File  flag   If temp rst1 EOF Or temp rst2 EOF Then MsgBox  null

[ms-access] How do I test if a recordSet is empty? isNull?

Examples related to ms-access

Examples related to vba