>Hi,
> MS Access database which located in other machine.
>
>Thank you

I have done some test too and my results are different from yours!

Select * = 9 seconds
Select count(*) = 8 seconds

Here is my code:

Option Explicit

Private Sub Command1_Click()
Dim db As DAO.Database
Dim i As Integer
Dim rs As DAO.Recordset
Dim tmrStopWatch As ccrpStopWatch

    Set tmrStopWatch = New ccrpStopWatch

'    Set db = Workspaces(0).OpenDatabase("C:\Program Files\Microsoft Visual Studio\VB98\nwind.mdb")
    Set db = Workspaces(0).OpenDatabase("u:\oeq\data\donnees\oeq.mdb")
    For i = 1 To 500
        Set rs = db.OpenRecordset("select * from membre", dbopensnapshot)
        rs.Close
    Next i
    MsgBox "Elapsed time: " & Format(tmrStopWatch.Elapsed / 1000, "#,##0.000") & " seconds"
End Sub

Private Sub Command2_Click()
Dim db As DAO.Database
Dim i As Integer
Dim rs As DAO.Recordset
Dim tmrStopWatch As ccrpStopWatch

    Set tmrStopWatch = New ccrpStopWatch
    
    Set db = Workspaces(0).OpenDatabase("u:\oeq\data\donnees\oeq.mdb")
    For i = 1 To 500
        Set rs = db.OpenRecordset("select count(*) from membre", dbopensnapshot)
        rs.Close
    Next i
    MsgBox "Elapsed time: " & Format(tmrStopWatch.Elapsed / 1000, "#,##0.000") & " seconds"
End Sub