Using ADO recordset Find method

Hi VB gurus

How can i use Find method of Recordset object in ADO.
I can do that through DAO using FindFirst,FindNext,FindLast and FindPrevious methods.
These methods are not there in ADO.
Please help me

try using something like this:

Code:

---

  Dim SearchNumber as Integer
  Dim SearchString as String

  With Recordset
      .MoveFirst

      'if you're searching for a number
      .Find "ColumnName=#" & SearchNumber & "#"

      'or for a string:
      '.Find "ColumnName=' & SearchString & "'"

      If Not .EOF Then

        'a record was found
        'do something

      End If
  End With

---

hope this helps!

ThanQ Nina

What you specified is for simple searching.

suppose i am having a table Orders. which contains a field Customer_name.In that field there is the repetetion of each customer name since one customer can place many orders.
Now i want searh for records based on aparticular customer name. According to you i will move to the first record and
execute
rs.find customer_name='xxxxx'.

The record pointer moves to the first existance of the customername.
now i want to move to the second existance of the same customer.(in DAO i can achieve this using
rs.findnext cust_name='xxxxx')
how can i do this using ADO.

also if the record pointer is at third existance of the customer_name 'xxxxx'.Now i want to move to the second existance.(Using DAO i can do this using
Rs.FindPrevious customer_name='xxxxx')
How can i do this Usin ADO.

Please find the solution for this
Thanks in advance.

If you use
ADO.recordset.Filter="CustomerName LIKE '" & varCusName & "'"
it will return all the records that met the criteria if you need more criteris just use AND in it. varCusName would just be a variable or control with the string of what to search for.
Or change the recordset to be a SQL statement
Set Recordset="Select * From CustomerOrders WHERE CustomerName=". ... yada yada
Read the help topics for Filter and SQL and see if it is what you are looking for.

If you want to get several records as a result I would create a new recordset with just these records ...
I think that's the easiest way ...

e.g.
StrSQL = "SELECT * FROM Table WHERE Customer_Name=" & SearchString

That's OK.
You are all sugesting alternatives.
But There comes a situation where you have to scroll through the recordset that contains all the record inthe table.
I don't want to fire a recordset for each criteria every time.

Please find the solution for my problem( No alternatives please).

Well, if you want to go through all records in a recordset you can use

movefirst
movelast
movenext
moveprevious

is that what you are looking for?

No Nina

You know FindFirst,FindNext, FindPrevious, FindLast in DAO. Right?
I want the Equivalents in ADO.

Now tell me the solution

I think what you want to do is possible in ADO and pretty simple.

VB Code:

FindFirst:
rs.MoveFirst
rs.Find Criteria, 0, adSearchForward
 
FindNext:
rs.Find Criteria, 1, adSearchForward  ' The 1 tells it to skip the current record.
 
FindPrevious:
rs.Find Criteria, 1, adSearchBackward
 
FindLast:
rs.MoveLast
rs.Find Criteria, 0, adSearchBackward

Look at the MSDN article on Find Method (ADO), but in the syntax section ignore the parentheses.

I haven't used this much, but I think it will work for you.

can't you use the .index and .seek methods ?

set the index first and then seek with parameters.

Or filter the results out as stated above.

.index and .seek are DAO Methods not ADO.

You could use .Filter then use the .MoveFirst, .MoveNext, .MovePrevious, .MoveLast to move around in the records that are selected.

I prefer to use .Find if I am looking for 1 record and searching only one field. For anything complicated .Filter works better.