Counting number of records returned by SQL.

[Mike O'Brien]

Try using the RecordCount property of your recordset after
the MoveLast method:

strSQL = "Select values from table"
set db = DBEngine.Workspaces(0).Databases(0)
set rs = db.OpenRecordset(strSQL, DB_OPEN_DYNASET)

rs.MoveLast
Debug.Print rs.RecordCount

Mike.