AccessTr.neT
Sorgulama Hk. - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Sorgulama Hk. (/konu-sorgulama-hk.html)

Sayfalar: 1 2


Sorgulama Hk. - SADIK54 - 31/07/2009

Arkadaşlar form sayfası içinde 6-7 adet hücrem var ben bunlardan 1 hücre 2 hücre yada 3 hücre doldurabilirim hangilerini doldurursam ona göre liste kutusunda bilgilerin gelmesini istiyorum. nasıl yapabilirim.


Cvp: Sorgulama Hk. - gocebe - 31/07/2009

aşağıdaki kodlar örneğinizden alıntıdır.
bu mantık ile arama kriteri olabilecek form elemanlarını if ile dolu olma durumunu kontrol ederek Sql değişkeni içersinde kriteri biriktirerek buton kodunun en sonuna eklediğim liste veri kaynağını tekrar oluştur ve yenile yapıp formda sonucu görebilirsin.

Private Sub Komut112_Click()
Dim Sql As String
SQL = ""

If Me.BOLGE <> "" Then
If Sql = "" Then
Sql = Sql + "[BOLGE]='" & Me.BOLGE & "'"
Else
Sql = Sql + " and [BOLGE]='" & Me.BOLGE & "'"
End If
End If
.
.
.
.
.
.
.
.
.
.

Me.Liste113.RowSource="SELECT ARACLAR.[Sıra No], ARACLAR.[Çeker Plaka], ARACLAR.Markası, ARACLAR.Tipi, ARACLAR.Modeli, ARACLAR.Rengi, ARACLAR.Sahiplik, ARACLAR.Operasyon, ARACLAR.[Trafiğe Çıkış Tarihi], ARACLAR.[Garanti Süresi Bitiş Tarihi], ARACLAR.[Fenni Muayene Bitiş Tarih], ARACLAR.[Eksoz Muayene Bitiş Tarih], ARACLAR.[Trafik Sigorta Bitiş Tarih], ARACLAR.Durum, ARACLAR.Bölge FROM ARACLAR" & Sql & ";"
Me.Liste113.Requery

End Sub


Cvp: Sorgulama Hk. - Seruz - 31/07/2009

Birçok yöntem var ancak en basit şekilde, liste kutusunun satır kaynağındaki sorguda like kriterini kullanarak yapabilirsiniz. Örneğin bölge için kriter:
Kod:
Like [Forms]![ANAFORM]![BOLGE] & "*"
Örnek ekte, ben sadece 2 tanesini yaptım (Bölge, Operasyon), gerisini tamamlarsınız.

Sorgulama tuşuna basmadan da güncelliyor, sorgula tuşuna basınca da.
İstediğiniz şekilde kullanırsınız.


Cvp: Sorgulama Hk. - SADIK54 - 31/07/2009

sn.seruz teşekkür ederim. benim için çok faydalı bir bilgi oldu.


Cvp: Sorgulama Hk. - assenucler - 31/07/2009

Sayın Seruz;

Hayırlı Cuma'lar... Sizi her zaman zevkle izliyorum ve her yanıtınızı arşivliyorum..

Selam..


Cvp: Sorgulama Hk. - SADIK54 - 03/08/2009

Sn. Seruz sizin yaptığınız örnektekine göre sorguları devam ettirdim. ancak şu anda sorgulamam çalışmıyor bir türlü nedenini bulamadım. yardımcı olurmusunuz. son güncelleme yaptığım örnek dosya ektedir.