جستجو در بانک دیتا

[mmzarin]

با سلام
من یه برنامه یادآوری نوشتم
در حال حاضر برنامم رکورد اول را فقط پیغام میدهد و در مورد جستجو نمی دانم باید چکار کنم
ممنون میشم راهمایی بفرمائید.
البته دستورهای چستجو را بلدم که نمونشو در پایین گذاشتم

Adodc1.RecordSource = "Select *from Mrate where City='" & Text1.Text

ممنون میشم اگر هم سورسی دارید برای قرار دهید
با تشکر

[m.4.r.m]

این برای جست و جوی یک رکورد استفاده می شود

Adodc1.RecordSource = "Select * from Mrate where City='" & Text1.Text & "'"

Adodc1.Refresh

برای جست و جوی رکوردهای شبیه به هم استفاده می شود

Adodc1.RecordSource = "Select * from Mrate where City Like '" & Text1.Text & "%'"

Adodc1.Refresh

[saeedzx]

نحوه صحیح جستجو کلمه به کلمه

If Text1.Text = "" Then

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db.mdb;"

Adodc1.RecordSource = "Select * from tabel"

Adodc1.Refresh

Set DataGrid1.DataSource = Adodc1

End If

If Text1.Text <> "" Then

Adodc1.RecordSource = "Select *from tabel where code like'" & Text1.Text & "%'"

Adodc1.Refresh

Exit Sub

End If