Why does this return a record count of zero when there are records in the recordset (or at least, I believe there should be)?
Code:Sub ChkForRecordsB4DelCat() Dim db As DAO.Database Dim rst As DAO.Recordset Dim strSQL As String Dim dblRcrdCount As Double strSQL = "SELECT * FROM tbl_Inv_Donations WHERE [Inv_Cat_No] = " & Me.tx_Cat_Mstr_No.Value & " AND [Inv_Del_Date] Is Null" Set db = CurrentDb() Set rst = db.OpenRecordset(strSQL) If rst.EOF Then dblRcrdCount = 0 Else rst.MoveLast rst.MoveFirst dblRcrdCount = rst.RecordCount Debug.Print dblRcrdCount End If rst.Close db.Close End Sub