Author  

Language  

Operating Systems  

'This really can make your database searching much faster 
'if you implement this to a big database. In normal search:

Do While Not record.EOF 
   [search criteria]
   record.MoveNext
Loop

'To improve the search process, you can use this method:

Record.MoveLast
intCount=Record.RecordCount
Record.MoveFirst

For i=1 To intCount
  [search criteria]
  Records.MoveNext
Next i

'It can improve arround 40% faster. Try it!!