how search and to display all data with refer to your search key in same field

tq in advance

didnt understand anything.. are you using ADO/DAO, with data control or recordset objects... Place some code of yours (that is relevant to this subject) and point to where you are stuck...

____________________________
If you find the answer helpful, please mark this topic as solved.

how can i may possible to search and find datarecord in m.access using adodb and display it in listview.

the search term is will display any record witch match the search text ( just like using find in m/word ) for example iam search using key word " rahman " and my record only have "abd rahman " but still able to found "abd rahman " using "rahman"
(using ado record set)
thanks

####
Private Sub Command1_Click()
Dim strSQl As String
Dim litem As ListItem

'if there is nothing to search for then exit
If Text1.Text = "" Then
    Exit Sub
End If

ListView2.ListItems.Clear


'make the search
        strSQl = "SELECT * FROM surat"
        strSQl = strSQl & " WHERE tajuk surat LIKE '*" & Text1.Text & "*'"

        
'show the found records
    
    Dim ts As ADODB.Recordset

Set ts = New ADODB.Recordset
ts.Open "SELECT * FROM surat", "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=C:\Program Files\E- file management\fail.mdb"

ts.open"(strSQL)"

    If Not (ts.BOF And ts.EOF) Then
        Do While Not ts.EOF
            'List1.AddItem rs.Fields(1).Value
            
        Set litem = ListView2.ListItems.Add(, , ts.Fields(1).Value)
        litem.SubItems(1) = ts.Fields(2).Value
        litem.SubItems(2) = ts.Fields(8).Value
        litem.SubItems(3) = ts.Fields(3).Value
        litem.SubItems(4) = ts.Fields(5).Value
        litem.SubItems(5) = ts.Fields(6).Value
        litem.SubItems(6) = ts.Fields(7).Value
        
        ts.MoveNext
        Loop
    End If
'close the recordset
    ts.Close
    
End Sub

Try

ts.open strSQL

instead of

ts.open"(strSQL)"


____________________________
If you find the answer helpful, please mark this topic as solved.

there another error
" one or more require value not set"

quote:

---

strSQl = "SELECT * FROM surat"
        strSQl = strSQl & " WHERE tajuk surat LIKE '*" & Text1.Text & "*'"

---

THERE IS STILL ERROR
ERROR
VALUE NOT SET

OR ELSE
DO YOU HAVE ANY IDEA HOW MAKE SEARCH  IN RECORD SET BY WORD ( JUST LIKE YOU USING FIND FUNCTION IN EXEL )

Well, then you are using incorrect names of table\field. Check if

surat = table name
tajuk surat - field name that exists in surat table

After you execute a query and fill recordset with data, then you can use Find method to search for some string value.

[Edited by Goran on 20-02-2005 at 01:45 AM GMT]

____________________________
If you find the answer helpful, please mark this topic as solved.

yes surat is table name
and tajuk surat is valid field name [tajuk surat]

Which line is giving you that error please? and also you may want to change you like to '%" & Text1.Text & "%'"

Steve