Strange behavior with query and rs.Recordcount

[John J.]

I have the following code which executes a query with criteria which comes
from a form:

Set db = CurrentDb
Set qdf = db.QueryDefs("qryMyQuery")
For Each parm In qdf.Parameters
parm.Value = Eval(parm.Name)
Next parm
Set rs = qdf.OpenRecordset
MsgBox rs.RecordCount

The msgbox returns 1 but if I run the query manually it gives me 2 records
(which is the right number).

Can someone help me out?
Thank you.
John

 

[Allen Browne]

The recordset count is the number of records accessed so far. Immediately
after an OpenRecordset, this will be 1 (if there are any) or 0 (if there are
no matches. You must MoveLast to get the true count.

Details in:
Traps: Working with Recordsets - 10 common mistakes
at:
http://allenbrowne.com/ser-29.html#RecordCount_without_MoveLast

 

[John J.]

Thanks Allen, works like a charm!

The recordset count is the number of records accessed so far. Immediately
after an OpenRecordset, this will be 1 (if there are any) or 0 (if there
are no matches. You must MoveLast to get the true count.

Details in:
Traps: Working with Recordsets - 10 common mistakes
at:
http://allenbrowne.com/ser-29.html#RecordCount_without_MoveLast