Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
22/02/2009 09:46
Konu Sahibi
accessman
Yorumlar
14
Okunma
4649
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

accessman

Aktif Üye
Kullanici Avatari
Aktif Üye
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
aynı isimli bir konu açmıştım fakat oraya eklenti ekleyemedim bunun için tekrar konu açtım
çoklu seçim özelliği olan ilk listeden (liste0) dan şeçtiğimiz hastalara ait tedavi bilgilerinin (liste2) de süzülmesini nasıl sağlayabiliriz
yani seçilen hasta sayısı değiştikçe liste2 de değişecek
yardımcı olacak arkadaşlara teşekkürler


Ek Dosyalar
.rar   çoklu seçimle bir listeden diğer listeyi süzmek.rar (Dosya Boyutu: 28,38 KB / İndirme Sayısı: 46)
Cevapla

C*e*l*o*y*c*e

Celosoft Yazılım
Kullanici Avatari
Uzman
M.... B....
2.995
29/10/2008
927
Ankara
Celosoft Yazılım
Ofis 2010 32 Bit
Bugün,16:56
Çözüldü 
sayın accesman
önceden elimde bulunan bir alıntı iki örnek var bunu incele ve kendine uyarla,kolay gelsin


Ek Dosyalar
.rar   bir_liste_kutusundan_digerine_bilgi_tamak.rar (Dosya Boyutu: 11,98 KB / İndirme Sayısı: 61)
.rar   seçilen listeden_kayıt.rar (Dosya Boyutu: 19,42 KB / İndirme Sayısı: 67)
Cevapla

Seruz

Uzman
Kullanici Avatari
Uzman
S.... U....
1.550
7
30/10/2008
814
Tekirdağ
Ofis XP
17/10/2017,17:32
Çözüldü 
Gönderdiğiniz örneği istediğiniz şekilde düzelttim.

Siz Where kontrolünü
Or ile yapmaya çalışmışsınız, ben bu tür çoklu kontrollerde daha uygun olan In ile yapmayı tercih ettim.

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Private Sub Liste0_AfterUpdate()
Dim v, Id, Kriter

    'EĞER LİSTE BOŞSA
    If Me.Liste0.ItemsSelected.Count = 0 Then
        Liste2.RowSource = ""
        MsgBox "LÜTFEN LİSTEDEN SEÇİM YAPIN", vbExclamation, "DİKKAT"
        Exit Sub
    End If

    'LİSTE KUTUSUNDAN KRİTER EKLEME
    Kriter = ""
    For Each v In Liste0.ItemsSelected
        Id = Liste0.Column(0, v)
        If Kriter = "" Then Kriter = Kriter & "(" Else Kriter = Kriter & ","
        Kriter = Kriter & Id
    Next v
    Kriter = Kriter & ")"
    
    Liste2.RowSource = "SELECT tedavikod, hastakod, tedavi FROM tedavi WHERE hastakod in " & Kriter & ";"
    Liste2.Requery

End Sub


Ek Dosyalar
.rar   coklu_seruz.rar (Dosya Boyutu: 13,06 KB / İndirme Sayısı: 84)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla

Tombakoglu

Aktif Üye
Kullanici Avatari
Aktif Üye
109
7
27/01/2009
3
Eskişehir
Ofis 2007
28/12/2015,19:19
Çözüldü 
Teşekkürler,
Hayırlı çalışmalar dilerim.


Cevapla

accessman

Aktif Üye
Kullanici Avatari
Aktif Üye
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
teşekkürler arkadaşlar
süpersiniz


Cevapla

accessman

Aktif Üye
Kullanici Avatari
Aktif Üye
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
arkadaşlar açılmış bir konuya cevap yazarken eklenti ekleyemiyorum
eklenti düğmesi gözükmüyor


Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Ana Formdayken Bir Alt Formdan Diğer Alt Formun Düğmesine Tıklama Olayı sertac76 4 133 20/09/2017, 10:36 sertac76
Çözüldü Otomatik Yapmak sormaneden07 3 142 12/09/2017, 16:59 sormaneden07
Çözüldü Listede Ayni Kişiden Tek Satır Görünmesi m_demir 3 215 12/08/2017, 19:39 m_demir
Çözüldü Çoklu Form Bağlantılarına Kısıtlama orhantanriverdi 2 223 23/07/2017, 12:38 orhantanriverdi
Çözüldü Formda Farklı Tablolardan Toplama İşlemi Yapmak ALTANs 5 440 01/06/2017, 17:12 ALTANs

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.