Süzme Sorgu birkaç alana uygulama
Tarih
10/02/2009 10:40
Konu Sahibi
saslan33
Yorumlar
6
Okunma
2226
Konuyu Oyla:
  • Derecelendirme: 2/5 - 1 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 2/5 - 1 oy
saslan33
Aktif Üye
Kullanici Avatari
Aktif Üye
30
10/02/2009
8
Zonguldak
Ofis 2010
06/04/2015,15:43
Çözüldü 
Arkadaşlar kolay gelsin

Süzme sorgu yapıyorum alanın birisinde isteğim değiri veriyor o alanda aynı kayıttan çok fazla olduğu için ikinci bir alandan daha sorgu yaptığımda birinci sorğuyu iptal edip iknicisi üzerinden değirlendiriyor bana bu konuda yardımcı olursanız çok sevinirim.


Ek Dosyalar
.rar   Süzle Sorgu.rar (Dosya Boyutu: 17,05 KB / İndirme Sayısı: 27)
Cevapla

Puletin
Uzman
Kullanici Avatari
Uzman
1.716
01/11/2008
416
Ülke Dışı
Ofis 2003
24/12/2016,00:18
Çözüldü 
Sponsor Reklam
Basit bir şeyler ekledim siz istediğiniz diğer alanlara da uygulaya bilirsiniz.


Ek Dosyalar
.rar   Süzle Sorgu.PuLeTiN.rar (Dosya Boyutu: 31,78 KB / İndirme Sayısı: 43)
Kaplumbağa ya dikkat et...
Sadece başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla

esrefigit

Kullanici Avatari
Onursal
598
30/10/2008
359
Konya
Ofis 2003
12/05/2017,17:08
Çözüldü 
Private Sub T1_Updated(Code As Integer)
suz
End Sub

Private Sub T2_Updated(Code As Integer)
suz
End Sub

Private Sub T3_Updated(Code As Integer)
suz
End Sub
Function suz()
Dim strFilter As String
strFilter = ""

If Me.T1 <> "" Then
strFilter = "Adı Like'" & Me.T1 & "*'"
strFilter = strFilter & " AND "
End If

If Me.T2 <> "" Then
strFilter = strFilter & "Soyadı Like'" & Me.T2 & "*'"
strFilter = strFilter & " AND "
End If

If Me.T3 <> "" Then
strFilter = strFilter & "Baba Adı Like'" & Me.T3 & "*'"
strFilter = strFilter & " AND "
End If
If strFilter = "" Then
MsgBox ("Kriter girmediniz tekrar giriniz!")
Else

strFilter = Left$(strFilter, Len(strFilter) - 5)
DoCmd.ApplyFilter , strFilter
End If

End Function
meşhur çin atasözü  "ACCESS İLE YAPABİLECEKLERİNİZ HAYAL EDEBİLECEKLERİNİZ İLE SINIRLIDIR" siz ne kadar hayal edebiliyorsunuz
Cevapla

saslan33
Aktif Üye
Kullanici Avatari
Aktif Üye
30
10/02/2009
8
Zonguldak
Ofis 2010
06/04/2015,15:43
Çözüldü 
Sponsor Reklam
esrefigit kardeş kod bilgim pek yok verdiğiniz kodu örnek üzerinde uyğulayabilirseniz öğrenmem daha kolay olur teşekkür ederim.
PuLeTiN ilginiz için teşekkür ederim. Bunu ben daha önce uyguladım bir sorunla karşılaştım eger adı ve soyadı bölümlerinden biri doldurulmamış ise yani boş ise o alandan sorgu yapmıyor o alanı hiç görmüyor.
Cevapla

Puletin
Uzman
Kullanici Avatari
Uzman
1.716
01/11/2008
416
Ülke Dışı
Ofis 2003
24/12/2016,00:18
Çözüldü 
Sorgunuzun Ölçüt bölümüne

Kod:
Is Null Or Like"*"&Formlar!Form1![ADI]&"*"

Şeklinde yazarsanız kayıtlarda boş olan varsa bile sorguda getirecektir...

Kaplumbağa ya dikkat et...
Sadece başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla

saslan33
Aktif Üye
Kullanici Avatari
Aktif Üye
30
10/02/2009
8
Zonguldak
Ofis 2010
06/04/2015,15:43
Çözüldü 
Sponsor Reklam
TAMAM EKLEDİM OLDU- TEŞEKKÜRLER
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Sad İki Tarih Arası Sorgu Problemi AloneX 13 270 26/05/2017, 11:14 ozanakkaya
  Sorgu Birden Fazla Kayıtların Silinmesi burhanb 2 67 25/05/2017, 08:32 burhanb
  Ürün Sorgu Kodu Çalışmıyor U.ALTUN 9 198 15/05/2017, 17:13 U.ALTUN
  Combox Sorgu Etkileşimi blue_wall 4 134 14/05/2017, 12:30 blue_wall
  Access Tablo - Sorgu Bağlanması hasan şahin 5 178 13/05/2017, 12:04 atoz112


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status