Alt formda veri süzme

[Recep İpek]

Merhaba,

Ekteki örnek dosyada Form1'de seçim kutuları ile alt formda verileri süzdürebiliyorum.

onay tablosu, veri tablosunun ilk 3 verisine göre (cadde hariç) gruplandırılmış şekli.

Benim yapmak istediğim Form1 tablosundaki cadde seçim kutusundan herhangi bir veri seçtiğimde bu caddeye ait il,ilçe,mahalle yani gruplandırılmış onay sorgusundan aynı şekilde alt formda süzülmesi.


Örneğin il seçim kutusundan İstanbul'u seçtiğimde bana alt formda İstanbul'a ait verileri gösteriyor.

Aynı şekilde cadde seçim kutusundan atalar'ı seçtiğimde de bana İstanbul'a ait (atalar'a bağlı il,ilçe,mahalle) bilgileri göstermesi gerekiyor.

 

[modalı]

Sayın Recep İpek,

Veritabanı mimarisinde eksiklikler var ama, isteğiniz şöyle olabilir:

Private Sub Combo04_AfterUpdate()
Me.Combo01 = DLookup("il", "veri", "cadde='" & Me.Combo04 & "'")
Me.Combo02 = DLookup("ilçe", "veri", "cadde='" & Me.Combo04 & "'")
Me.Combo03 = DLookup("mahalle", "veri", "cadde='" & Me.Combo04 & "'")
Forms![Form1].[onay_subform].Form.Requery
End Sub

İyi çalışmalar

 

[Recep İpek]

Hocam ne diyeyim.Süpersiniz.

Evet tasarımda bazı eksiklikler var.Nedeni ise tablolar arasında index olabilecek bir alan bulamıyoruz.Toplamda 8 adet birbirleri ile bağlantılı alan var.Fakat 1 tabloda bunların 5 tanesine göre gruplandırılıp, diğerinde ise 3 tanesine göre gruplandırılıp işlem yapılması gerekiyor.

Hocam peki sol taraftaki seçime göre cadde bilgisini getirebilir miyiz?

Örneğin İstanbul seçtiğimde ilçe seçim kutusunda istanbul'a ait ilçeler geliyor.

Aynı şekilde cadde seçim kutusuna İstanbul'a ait caddeler görüntülenebilir mi?

Tekrar teşekkürler.

 

[modalı]

Sayın Recep İpek,

caddeler açılan kutusunun veri sekmesinin satır kaynağına şu sorgu cümlesini kopyalayıp yapıştırın:

SELECT DISTINCT veri.cadde, veri.il, veri.ilçe, veri.mahalle FROM veri WHERE (((veri.il) Like IIf(Forms!Form1!Combo01 Is Null,"*",Forms!Form1!Combo01)) And ((veri.ilçe) Like IIf(Forms!Form1!Combo02 Is Null,"*",Forms!Form1!Combo02)) And ((veri.mahalle) Like IIf(Forms!Form1!Combo03 Is Null,"*",Forms!Form1!Combo03)));

Tüm açılan kutuların güncelleştirme sonrası olayına aşağıdaki kodu ekleyin.

Me.Combo04.Requery

İyi çalışmalar

 

[Recep İpek]

Son olarak.Sanırım birşeyi atladım. :frown:

Cadde seçim kutusundan seçtiğim verinin onay tablosunda birden fazla karşılığı var ise onları göstermiyor.Her defasında bir tek veri gösteriyor.

 

[modalı]

Örneğinizde öyle bir durum rastlamadım. Sanırım başka bir uygulamaya taşıyorsunuz kodları.

Örnğinizi bu şekilde değiştirip ekleyebilirmisiniz?

 

[Recep İpek]

Örnek dosya ektedir.

 

[modalı]

Önce yapılanları iptal edip sorguyu değiştirdim.

İyi çalışmalar

 

[Recep İpek]

Çok teşekkürler.Ben üzerinde biraz çalışayım...

 

[Recep İpek]

Hocam bu seferde alt formda örneğin 2 adet cadde var ise aynı veriyi 2 defa gösteriyor.

Örneği revize ettim.Cadde bilgisi istediğimiz gibi geliyor.

Sadece seçilen caddeye göre alt formda onay tablosundan o caddeye ait gruplandırılmış verileri nasıl gösterebiliriz?

 

[Recep İpek]

Uzun uğraşlardan sonra çözümü istediğim gibi buldum.

İlgili cadde bilgilerini gruplandırılmış tabloya yan yana yazdırdım.Bu şekilde Like * [alanadi] * ile seçmiş olduğum bilgileri bulduruyorum.

Belki birilerine lazım olabilir.