Record Counts of ADO recordset 2

[jpl458]

Trying to get the number of records in an ADO recordset, using the following code:

If mailRs.Supports(adApproxPosition) = True Then
Me.EmCount.Value = mailRs.RecordCount
End If

It skips the second line of code indicating that my RS does not support the cursor type. How do you set that support, or is there another way of skinning the cat (getting a record count).

Office 10
Windows 7

Thanks

jpl

 

[SkipVought]

hi,

with mailRs
   on error resume next

   .movefirst

   if err.number = 0 then
      Me.EmCount.Value = .recordcount

      do while not .eof
       'do stuff with data for current row

         .movenext
      loop
   end if
end with

Skip,

_{Just traded in my OLD subtlety...
for a NUance!}

 

[MajP]

Here is a good solution.

http://www.slxdeveloper.com/page.aspx?action=viewarticle&articleid=33

Since you have the connection already just do a "select *" first to get the count.