[FORM] Dlookup özelliği ile kayıt çağırma
#1
Değerli hocam, ekte sunduğu bir form oluşturdum. Burada "Olayın Adı" açılan kutusundan bir olay seçtiğimde, "Aidiyet Numarası" ve "Saklama Süresi" ni otomatik olarak almak,bu bilgileri de tabloda görmek istiyorum,bu mümkünmü dür onu da bilmiyorum.Ayrıca aynı formda "Arşiv İmha Tarihi"ni sizlerin katkılarıyla Date Add özelliğinden faydalanarak yaptım,oldu, ancak "Arşiv İmha Tarihi"ni tablodaki alana atmıyor.Yardımlarınız için sonsuz minnettarım,


Eklenti Dosyaları
.rar   olay2012 tasarım.rar (Boyut: 1,5 MB / İndirilme: 101)



  Alıntı
Bu mesajı beğenenler:
#2
Merhaba..

Olay adı kutusunun güncelleştirme sonrasına bu prosedürü yazınız..

Not: Veriler kutulara kaynak gösterdiğiniz tablolardan alınmaktadır..

Visual Basic
  1. Dim trz As String
  2. trz = Me.Olayın_Adı.Text
  3. Me.aidiyet_numarası.Value = DLookup("[AİDİYET NUMARASI]", _
  4. "[TCK SON OLAY İSİMLERİ]", "[SUÇ TÜRLERİ]= '" & trz & "' ")
  5. Me.Saklama_Süresi.Value = DLookup("[SAKLAMA SÜRESİ]", _
  6. "[TCK SON OLAY İSİMLERİ]", "[SUÇ TÜRLERİ]='" & trz & "' ")





  Alıntı
Bu mesajı beğenenler:
#3
Merhaba değerli hocam, VBA kodu olarak yazdım, fakat beceremedim,affınıza sığınarak, olayın VBA kodu yazılmış halini gönderebilirmisiniz,en azından bu örneğe göre birkaç uygulama yaparak öğrenmiş olurum,saygılar sunarım.



  Alıntı
Bu mesajı beğenenler:
#4
(05-02-2012, 00:32)reginardben demiş ki: Merhaba değerli hocam, VBA kodu olarak yazdım, fakat beceremedim,affınıza sığınarak, olayın VBA kodu yazılmış halini gönderebilirmisiniz,en azından bu örneğe göre birkaç uygulama yaparak öğrenmiş olurum,saygılar sunarım.

Kodları ilgili forma ekledim..



  Alıntı
Bu mesajı beğenenler:
#5
Merhaba hocam,VBA kodu yazılmış şekliyle veri girişi yaptım, ancak olayın adını girdikten sonra aidiyet numarası ve saklama süresini alamadım,hocam acemiliğime bağışlayın lütfen,ekte tekrar form gönderiyorum,Olayın adı kısmından olayın adını seçtiğimde, aidiyet numarası ve saklama süresini ilgili kutulara otomatik olarak atması mümkünmüdür hocam, eğer bu mümkün ise yapmak istediğim formun ikinci aşamasına geçebileceğim, çok teşekkür ederim,saygılarımla


Eklenti Dosyaları
.rar   05.02.2012.rar (Boyut: 47,82 KB / İndirilme: 88)



  Alıntı
Bu mesajı beğenenler:
#6
Visual Basic
  1. Me.aidiyet_numarası.Value = DLookup("[AİDİYET NUMARASI]", _
  2. "[TCK SON OLAY İSİMLERİ]", "[SUÇ TÜRLERİ]= '" & trz & "' ")


olan yeri
Visual Basic
  1. Me.Aidiyet_Numarası.Value = DLookup("[Aidiyet No]", _
  2. "[TCK Olay 2012]", "[Olayın Adı]= '" & trz & "' ")


ile değiştirin
Teşekküre gerek yok, Taş atın yeter!!!



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Dlookup evren89 1 261 16-06-2024, 01:08
Son Mesaj: dsezgin
access-sql-9 [VBA] Veri Tabanındaki Bilgileri Farklı Bir Tabloya çağırma harun kaçar 4 567 20-05-2024, 14:29
Son Mesaj: dsezgin
  Dlookup Fonksiyonu bilservisci 1 344 08-09-2023, 15:36
Son Mesaj: dsezgin
  [VBA] Kayıt Iptali: Kayıt Iptal Tablosuna Ekle, Kayıdı Sil Işlemi programmer67 6 843 21-07-2023, 10:40
Son Mesaj: onur_can
access-sql-3 Querydef Sorgu çağırma Hatası alperalper 1 433 24-02-2023, 14:28
Son Mesaj: alperalper
  [VBA] Mssql Procedurü Vba Ile çağırma hedefkaya 46 2.420 09-10-2022, 20:21
Son Mesaj: halily
  Access Listbox In Olmayan "list" özelliği Yerine Ne Kullanabiliriz tarkanaykın 2 499 04-03-2022, 13:33
Son Mesaj: tarkanaykın
  [VBA] Access Vba üzerinden Sorgu çağırma Hatası tanyeri 20 1.246 13-02-2022, 17:47
Son Mesaj: onur_can

Foruma Git:


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