Total records in a query

[Charles Tam]

I would like to retrieve the total records in a query. Is my following code
correct?
MS said to use the MoveLast command, but I have to install an error handle
if the recordset is empty.
....
Set qry = currentDatabase.OpenRecordset("Query1")
qry.MoveLast
debug.print qry.RecordCount
....

 

[Marshall Barton]

I would like to retrieve the total records in a query. Is my following code
correct?
MS said to use the MoveLast command, but I have to install an error handle
if the recordset is empty.
...
Set qry = currentDatabase.OpenRecordset("Query1")
qry.MoveLast
debug.print qry.RecordCount
...

You can check for an empty recordset by checking its
RecordCount property. It won't actually tell you how many
records there are, but it will only be zero when there are
no records.

Set qry = currentDatabase.OpenRecordset("Query1")
If qry.RecordCount > 0 Then qry.MoveLast
debug.print qry.RecordCount

 

[Charles Tam]

Thanks for your information.

You can check for an empty recordset by checking its
RecordCount property. It won't actually tell you how many
records there are, but it will only be zero when there are
no records.

Set qry = currentDatabase.OpenRecordset("Query1")
If qry.RecordCount > 0 Then qry.MoveLast
debug.print qry.RecordCount