Userform, Like Operatörü
#1
Aşağıdaki kod bloğunda Textbox alanına Hakan yazdığımda ismi Hakan olanları getiriyor ancak; H,Ha,Hak yazdığımda veriler gelmiyor.

Birde büyük/küçük harf duyarlılığını ortadan nasıl kaldırabilirim.


Visual Basic
  1. .
  2. .
  3. .
  4. strSorgu = "select * from [personel] WHERE personel.id > 0"
  5.  
  6. If Len(Trim(TextBox1.Value & vbNullString)) > 0 Then
  7. strSorgu = strSorgu & " AND personel.ad='" & TextBox1.Text & "'"
  8. Else
  9. strSorgu = strSorgu & " AND personel.ad LIKE'" & TextBoxBox1.Text & "%'"
  10. End If
  11. .
  12. .
  13. .


ekte dosyam mevcuttur. Ara butonunu textbox ve combobox lara göre çalıştıramadım.



  Alıntı
Bu mesajı beğenenler:
#2
Like operatörün başında ve so unda * kullanman gerekiyor. Şöyle Like "*" & textbox & "*"



  Alıntı
Bu mesajı beğenenler:
#3
o şekilde de olmadı.


Ekte dosya ekledim. bakma imkanınız var mı acaba?


Eklenti Dosyaları
.rar   çalışmam.rar (Boyut: 101,55 KB / İndirilme: 3)



  Alıntı
Bu mesajı beğenenler:
#4
Filitreleme konusu yardımcı olur.

Private Sub TextBox3_Change()
...
...
rs.Open "select * from personel where (((ad) like '" & Me.TextBox3.Text & "%'))", baglan, adOpenKeyset, adLockPessimistic
With Me.ListBox1
If rs.RecordCount = 0 Then .Clear Else .Column = rs.GetRows
End With
...
End Sub



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Userform, Excel Ortamında Rapor Oluşturma Fetih1453 5 710 01-04-2022, 12:10
Son Mesaj: dsezgin
  Userform, Label'a Listboxta Listelenen Kayıt Sayısını Aktarmak Fetih1453 2 315 25-03-2022, 23:06
Son Mesaj: Fetih1453
  Userform, Msgbox Hakkında Fetih1453 1 293 25-03-2022, 22:56
Son Mesaj: dsezgin
  Access Te Bulunan Tablodan Excel Userform Labele Veri Atma ersin_gurbuz 1 534 24-05-2021, 13:43
Son Mesaj: dsezgin
  excel vba userform ile access veri tabanına dosya upload etme arif0636 2 1.189 06-09-2019, 16:28
Son Mesaj: arif0636

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi