Counting records in Access dB from VB (1 Viewer)

[Howlsta]

I'm trying to count the number of records in a table, normally i'd do a dcount. But I'm trying to correct a problem in some VB code, which appends new data to an Access dB.
How can I code it to count the records in the database from VB?

cheers

Rich

 

[Fizzio]

Why can't you still use DCount?
You could use a recordset if not DCount

Dim MyDb as Database, MyRs as Recordset
Set MyDb = CurrentDb
Set MyRs = MyDb.OpenRecordset("NameOfTable", dbOpenSnapshot)
MyRs.MoveLast
MsgBox MyRs.RecordCount
Set MyRs = Nothing

HTH