i have use this code by it not function. i want to search database using a button and a textbox.. but when i insert a column header of my database into the textbox, it can't show me all data from database.
Protected Sub cmdSearch_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdSearch.Click
Dim InputStr As String = txtsearch .Text
Dim patternStr As String = "([^\.\?\!]*)[(" & Trim(InputStr) & ")][\.\?\!]"
'For Each FileStr As String In IO.Directory.GetFiles("C:\Documents and Settings\sofi.SHDMNET.000\Desktop\PR1", "*.mdb")
For Each FileStr As String In IO.Directory.GetFiles("C:\Documents and Settings\sofi.SHDMNET.000\Desktop\PR1\", "*PR INFO.mdb")
'Can this search rtf? Yep'
Dim strToSearch As String = IO.File.ReadAllText(FileStr)
If strToSearch.Contains(InputStr) = True Then
GetDataItem(Select * from PR INFO ("FEB1 & New RECORD & PreviousPage Reg & PR Reg LAMA & PR&PO REGISTER"))
End If
Next
End Sub
anyone please help me...
This post has been edited by fifz: 17 June 2009 - 09:30 PM

New Topic/Question
Reply




MultiQuote




|