Selamlar,
Küçük Bir tablo oluşturdum tablo içerisine sadece 4 adet ülke ismi ekledim
india
hollandia
Germany
USA
Sorgu oluşturup Form üzerinden TextBox ile arama yaptırdığımda
india olarak sorgularsam sorgu ekranına geliyor fakat INDIA olarak sorgularsam sorgu ekranı boş çıkıyor
bayağı bir uğraşmama rağmen herhangi bir çözüm bulamadım
Örnek Dosya eklte
teşekkür ederim
Merhaba.
SQL sorgusuna alttaki gibi Lcase ekleyince çalıştı bende.
SELECT Veritabani.ID, Veritabani.ÜLKE
FROM Veritabani
WHERE (((LCase([Veritabani].[ÜLKE]))=LCase([Forms]![AramaF]![Arama])));
Buda başka yoldan yapılmış hali.
![[Resim: do.php?img=10458]](https://resim.accesstr.net/do.php?img=10458)
Option Compare Database
Private Sub ARA_Click()
Dim Sql As String
Dim rs As DAO.Recordset
Sql = "SELECT * FROM Veritabani WHERE LCase(ÜLKE)=""" & LCase(Me.Arama.Value) & """"
Set rs = CurrentDb.OpenRecordset(sql)
CurrentDb.QueryDefs("Veritabani Query").sql = sql
On Error Resume Next
DoCmd.Close acQuery, "Veritabani Query"
DoCmd.OpenQuery "Veritabani Query"
rs.Close
Set rs = Nothing
End Sub
(22/08/2020, 14:52)feraz yazdı: [ -> ]Buda başka yoldan yapılmış hali.
Option Compare Database
Private Sub ARA_Click()
Dim Sql As String
Dim rs As DAO.Recordset
Sql = "SELECT * FROM Veritabani WHERE LCase(ÜLKE)=""" & LCase(Me.Arama.Value) & """"
Set rs = CurrentDb.OpenRecordset(sql)
CurrentDb.QueryDefs("Veritabani Query").sql = sql
On Error Resume Next
DoCmd.Close acQuery, "Veritabani Query"
DoCmd.OpenQuery "Veritabani Query"
rs.Close
Set rs = Nothing
End Sub
Çok teşekkür ederim gayet güzel çalışıyor
Rica ederim,kolay gelsin.
(22/08/2020, 12:11)feraz yazdı: [ -> ]Merhaba.
SQL sorgusuna alttaki gibi Lcase ekleyince çalıştı bende.
SELECT Veritabani.ID, Veritabani.ÜLKE
FROM Veritabani
WHERE (((LCase([Veritabani].[ÜLKE]))=LCase([Forms]![AramaF]![Arama])));
kusura bakmayın Bir sorum olacak bu kodu nereye ekliyoruz