+- 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ığı: Açılır Listedeki verileri Almak (/konu-acilir-listedeki-verileri-almak.html)
Açılır Listedeki verileri Almak - s3co - 28/01/2010
Başlamadan önce teşekür ederim ilgilendiğiniz için
eklemiş olduğum kütüphane veritabanında bir sorunum oldu. "öğrenciye kitap verme" adlı formumda oluşturduğum açılır listeden veri seçtiğimde seçtiğim verinin göre adı ve soyadı kutularına gelmesini istiyorum ama bir türlü yapamadım yardım ederseniiz çok sevinirim.
Cvp: Açılır Listedeki verileri Almak - leylaz - 28/01/2010
DLookUp ile bu işi rahatlıkla yapabiliyoruz.
=DLookUp("[ADI]";"[ogrencilist]";"[ID]=" & [Açılan Kutu0])
ADI verinin gözükmesi istediğimiz (şu an işlem yapılan) metin kutusunun adı
ogrencilist verilerin çekileceği tablo adı
ID hangi numaraya göre veriyi sıralacağını ogrencilist tablosundan belirledik
Açılan Kutu0 formumuzdaki Üye listesi adlı açılır kutumuz ile ilişkilendiriyoruz.
![[Resim: ekranv.png]](http://img21.imageshack.us/img21/9526/ekranv.png)
Cvp: Açılır Listedeki verileri Almak - benremix - 28/01/2010
Sn S3co öncelikle sitemize hoşgeldiniz. Lütfen Site Kurallarını okuyunuz.
Örneklerinizi düzenle onar yaptıktan sonra zip veya rar ile sıkıştırıp ekleyiniz.
Cvp: Açılır Listedeki verileri Almak - Seruz - 28/01/2010
Dlookup kullanmadan yapmak için aşağıdaki konuyu okuyun.
Açılan kutudaki seçime göre formdaki metin kutularına bilgi getirme (Dlookup olmadan)
Cvp: Açılır Listedeki verileri Almak - s3co - 28/01/2010
sn leylaz çok teşekkür ederim istediğim gibi olmuş ellerinize sağlık ...Dlookup olayını çözemediğim için yapamamıştım şimdi çok süper oldu sağolun..
Sn benremix kusura bakmayın biraz azele oldu o yüzden yapamadım bundan sonra söylediklerinize dikkat ederek yapacağım.. çok sağolun..
Cvp: Açılır Listedeki verileri Almak - ercansahin - 28/01/2010
Öncelikle ilişkilerinizi tekrar oluşturun. ogrencilist tablonuzdaki Id ile verilen_kitap_adi tablonuzda bulunan Üye No alanını ilişkilendirin. Oluşturacağınız formda kitap adı için açılan kutu oluşturarak Tablo/Sorgu olarak belirleyin. Burada ise Kitap tablonuzdan kitap ismlerini çağırın. Böylelikle verilen_kitap_adi tablonuzdaki kitap adını belirlemiş olursunuz. Sonrasında da Seruz hocamın dediği gibi Dlookup kullanmadan arama yaptıracağınız açılan kutuyu oluşturun. Sizin için en kolay yol sihirbazı kullanmak olacaktır. Bu işlem sonrasında kod bölümünde;
Kod:
Private Sub Açılan_Kutu1_AfterUpdate()
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[Id] = " & Str(Nz(Me![Açılan Kutu1], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub