Access SQL   ›   MS SQL SERVER & DİĞER MS OFFICE VE VERİTABANI UYGULAMALARI   ›   DİĞER MS OFFICE VE VERİTABANI UYGULAMALARI   ›   MICROSOFT OFFICE PROGRAMLARI   ›   EXCEL   ›   EXCEL SORULARI   ›   Userform, Like Operatörü

Userform, Like Operatörü
Fetih1453
Yeni Üye 1-15

*
Kayıt Tarihi: 03.03.2020
Toplam 4 konu açtı.
Toplam 8 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2019,
Beğeniler: 0 / 0
#1
23-03-2022, 21:32 (En son düzenleme: 23-03-2022, 22:06 Fetih1453.)
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.



  Bul
  Alıntı
Bu mesajı beğenenler:
alperalper
Kıdemli Üye 400-1000

*
Kayıt Tarihi: 06.11.2013
Toplam 93 konu açtı.
Toplam 624 yorum yaptı.
Toplam 88 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016, Office 2019,
Beğeniler: 0 / 31
#2
23-03-2022, 22:07
Like operatörün başında ve so unda * kullanman gerekiyor. Şöyle Like "*" & textbox & "*"



  Bul
  Alıntı
Bu mesajı beğenenler:
Fetih1453
Yeni Üye 1-15

*
Kayıt Tarihi: 03.03.2020
Toplam 4 konu açtı.
Toplam 8 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2019,
Beğeniler: 0 / 0
#3
23-03-2022, 22:17 (En son düzenleme: 23-03-2022, 22:18 Fetih1453.)
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)



  Bul
  Alıntı
Bu mesajı beğenenler:
dsezgin
Forum Yöneticisi

*
Kayıt Tarihi: 24.03.2013
Toplam 27 konu açtı.
Toplam 9.037 yorum yaptı.
Toplam 1.068 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 56 / 235
#4
24-03-2022, 08:45
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
Access Fonksiyonlarının(Deyimler), Sorgu da kullanımı
Rapor veya-Pdf-Dosyalarını Birleştirme Uygulaması



  Website   Bul
  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.186 06-09-2019, 16:28
Son Mesaj: arif0636

Foruma Git:


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