Skip to main content

AccessTr.neT


Textboxda arama kriteri hakında

Textboxda arama kriteri hakında

Çözüldü #1

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
arabul()
End Sub
Private Sub arabul()
Dim baglan As OleDb.OleDbConnection = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=tablolar.mdb;")
Dim adp As New OleDb.OleDbDataAdapter()
adp.SelectCommand = New OleDb.OleDbCommand("Select * From faaliyetkodlari", baglan)

baglan.Open()

Dim ds1 As New DataSet()
adp.Fill(ds1)

baglan.Close()

ListView1.Items.Clear()
For Each i As DataRow In ds1.Tables(0).Rows

If (i("Aciklama").ToString().StartsWith(TextBox1.Text)) Then
Dim item As New ListViewItem(i("Kod").ToString())
item.SubItems.Add(i("Aciklama").ToString())
ListView1.Items.Add(item)

End If
Next
End Sub

Bu kod Textbox1 e yazarak veritabanında arama yapabiliyorum.

Benim istediğim cümle içindeki kelimede ve büyük küçük harfe DUYARSIZ olarak arama yapması.

Örnek:

Aranacak kelime = "Muhasebe"

Arama Cümlesi(verilerimizdeki faaliyet açıklaması) = " Defter Tutma ve Buna Benzer Muhasebe,Muhasebeye Benzer İşler"



Şümdi ben Textbox1 e "muhasebe" yada "muh" yazdığımda bu satırı bana bulamıyacak, ben cümle veya cümleler içinde de arama yapmasını istiyorum.

Teşekkürler

Ek Dosyalar
 faaliyet kod.rar(170.69 KB)
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Textboxda arama kriteri hakında - Yazar: drummers - 30/01/2012, 14:23
Cvp: Textboxda arama kriteri hakında - Yazar: Kur@l - 31/01/2012, 04:48
Cvp: Textboxda arama kriteri hakında - Yazar: drummers - 04/04/2012, 22:48
Task