Merhaba;
Örnek dosyada kisi ve bilgi isimli 2 tablom var.
kisi id ile bilgi id kısımları ilişkili. bilgi isimli formuma kisi tablosundan isimsiz bir text kutusuna Dlookup ile bilgileri getiriyorum. Ancak girdiğim kayıtlar arasında gezindiğim zaman Dlookup fonksiyonu çalışmıyor. Olay ların çoğunu denedim.
benim isteğim kayıtlar arasında gezerken Dlookup gibi çalışan fonksiyon.
örnek dosyamı ekledim yardımcı olursanız sevinirim.
Kayıtlarda Gezerken Dlookup Nasıl Çalıştırılır?
Merhaba ogzcntrk;
KISI_ID_AfterUpdate() olay yordamına yazdığınız aşağıdaki kodu
Şu şekilde yazarak deneyiniz.
İyi çalışmalar.
KISI_ID_AfterUpdate() olay yordamına yazdığınız aşağıdaki kodu
Private Sub KISI_ID_AfterUpdate()
Me.txt_adsoyad.Value = Dlookup ("AdSoyad", "tbl_kisi", "ID=" & [KISI_ID])
End Sub
Şu şekilde yazarak deneyiniz.
Private Sub Form_Current()
Me.txt_adsoyad.Value = Dlookup ("AdSoyad", "tbl_kisi", "ID=" & [KISI_ID])
End Sub
İyi çalışmalar.
(25/08/2017, 01:00)direnist yazdı: Merhaba ogzcntrk;Kodları yazan ellerinize sağlık. Sizin yazdığınız gibi değiştirince çalıştı. Allah razı olsun.
KISI_ID_AfterUpdate() olay yordamına yazdığınız aşağıdaki kodu
Şu şekilde yazarak deneyiniz.Kod:Private Sub KISI_ID_AfterUpdate() Me.txt_adsoyad.Value = DLookup("AdSoyad", "tbl_kisi", "ID=" & [KISI_ID])End Sub
İyi çalışmalar.Kod:Private Sub Form_Current() Me.txt_adsoyad.Value = DLookup("AdSoyad", "tbl_kisi", "ID=" & [KISI_ID])End Sub
Son Düzenleme: 25/08/2017, 20:53, Düzenleyen: ogzcntrk.
(Sebep: Yanlışlık)
Merhaba;
Kodu zaten siz yazmıştınız. Ben bişey yazmadım. Sadece yerini değiştirdim.
İyi çalışmalar.
Kodu zaten siz yazmıştınız. Ben bişey yazmadım. Sadece yerini değiştirdim.
İyi çalışmalar.
Formda gezinirken sorunum çözüldü. Ama aşağıdaki kodları eklediğimde Dlookup hata veriyor.
Private Sub Form_Load()
DoCmd.GoToRecord , , acNewRec
Me.KISI_ID.SetFocus
End Sub
merhaba
bu kodlardarı da ekle
ayrıca ne tür hata verdiğinide açıklayarak yazarsanız iyi olur,kolay gelsin
bu kodlardarı da ekle
Private Sub KISI_ID_AfterUpdate()
Me.txt_adsoyad.Value = Dlookup ("AdSoyad", "tbl_kisi", "ID=" & [KISI_ID])
End Sub
ayrıca ne tür hata verdiğinide açıklayarak yazarsanız iyi olur,kolay gelsin
Konuyu Okuyanlar: 2 Ziyaretçi