[FORM] açılan kutu değerine göre metin kutusuna otomatik giriş
#1
merhaba arkadaşlar ben accses programında çiftçi kayıtları için bi program hazırlıyorum. forumları daha önce hiç kullanmadım. Sabrınız ve anlayışınız için şimdiden özür dilerim. Soruma geçiyorum iki farklı tablom var
çiftçi tablo
ciftciID
ciftci_adi
ciftci_adresi

müşteriTabloda ise

musteri_ID
musteri Adi //açılan kutudaki çifçileri getiriyor.
adres //adresi otomatik olarak ciftci_adres kısmından almasını istiyorum.
telefon
e-mail

aynı ekilde açılan kutuda müşteri adı seçildiğinde o müşterinin yani çiftçinin diğer bilgilerinin metin kutusuna otomatik olarak gelmesini istiyorum. Yardımlarınız için teşekkür ederim.



  Alıntı
Bu mesajı beğenenler:
#2
Sayin necmi21;

VT orneginizi ekleyebilirmisiniz ?



  Alıntı
Bu mesajı beğenenler:
#3
haklısınız kusura bakmayın en kısa zamanda eklemeye çalışacağım



  Alıntı
Bu mesajı beğenenler:
#4
Sn Necmi bahsettiğiniz işlemi DLookup fonksiyonu ile yapabilirsiniz, şöyle bir yol izleyin, formtasarım modunda bir tane açılan kutu yerleştirin sihirnaz devrede olsun daha sonra kaynağı müşteri ID ve Müşteri adını seçerek ilerleyin, anahtar sütunu gizle işareti aktif olsun , daha sonra bu açılan kutunun Güncelleştirme Sonrasında olayına
Visual Basic
  1. Me.adres=DLookup("adres" , "ÇiftciTablo" , "ÇiftciID=" & Me.AçılanKutuAdı)
  2. Me.telefon=DLookup("telefon" , "ÇiftciTablo" , "ÇiftciID=" & Me.AçılanKutuAdı)


şeklinde yazarak istediğiniz bilgileri doldurmuş olursunuz...



  Alıntı
Bu mesajı beğenenler:
#5
Açılır Kutunun Özelliklerinden
Veri Sekmesi/ Satır Kaynağı/ (imleci alana taşıdığınızda sağ tarafta ... üç nokta çıkar
buraya tıklayıp kullanmak istediğiniz alanları ekleyiniz.

Biçim Sekmesi/Sütun Sayısı ve Görünmesini istemediğiniz alan boyutu 0cm olacak şekilde Sütun Genişliklerini ayarlayın (Örnek: 2cm;0cm;0cm)

Olay Sekmesi/Güncelleştirme Sonrasında olay yordamına aşağıdaki gibi kod ekleyin.

Visual Basic
  1. Private Sub musteri_Adi_AfterUpdate()
  2.  
  3. Me.adres = Me.musteri_Adi.Column(1)
  4.  
  5. End Sub



İşlem tamamlanmıştır.
Örneğinizde çeşit olması açısından Liste Kutusu kullanımı da gösterilmiştir.


Eklenti Dosyaları
.rar   Column( ) DeğerGetirme@59_34.rar (Boyut: 357,51 KB / İndirilme: 420)



  Alıntı
Bu mesajı beğenenler: relaxim
#6
Çok Teşekkür Ederim. Yardımlarınız sayesinde sorunum hal oldu.



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] Açılır Menüdeki Veriyi Metin Kutusuna Aktarma Pasham 1 291 19-02-2026, 21:18
Son Mesaj: adnan
  Açılan Kutudan Kritere Göre Veriyi Başka Alana Yazdırma osman06 8 519 23-11-2025, 11:33
Son Mesaj: dsezgin
  [FORM] Metin Kutusundaki Değeri Başka Bir Metin Kutusuna Aktarmak TheREDROSE 2 439 02-08-2024, 11:56
Son Mesaj: TheREDROSE
access-sql-18 Format([giris], "dd-mm-yyyy" Sorgu Ifadesi Içindeki Derleme Hatası. gncbil 5 633 07-06-2024, 10:48
Son Mesaj: dsezgin
  Acceste Liste Kutusundan Seçilen Veriyi Metin Kutusuna Gönderme Pasham 24 1.602 04-04-2024, 01:18
Son Mesaj: halily
  Tabloya Qr Kodla Veri Giriş SBNS 3 549 08-02-2024, 13:24
Son Mesaj: BeyTor
  [FORM] Inputbox Kutusuna Girilen Değere Pasword Maske Uygulama orderyazbim 2 504 22-01-2024, 22:12
Son Mesaj: orderyazbim
  Açılır Kutu Değerine Göre Tablo2'ye Değer Yazsın Veya Satır Eklesin. ŞabanTR 11 1.119 24-12-2023, 14:38
Son Mesaj: dsezgin

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi