Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   Docmd.gotorecord,,newrec Sonrası Otomatik Dolu Metin Kutusu

Docmd.gotorecord,,newrec Sonrası Otomatik Dolu Metin Kutusu
meceka
Yeni Üye 15-40

*
Kayıt Tarihi: 26.01.2022
Toplam 5 konu açtı.
Toplam 16 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2019,
Beğeniler: 2 / 0
#1
09-11-2022, 17:01
Merhaba;
Kişi detay formum ve veri giriş formum var. Kişi detayda veri gir butonu ile veri giriş formunu açıyorum. İstediğim bu form kişinin adı ile yeni kayıt şeklinde açılsın. 
Butona tıkladığımda açılan formun yeni id (veri id) almasını ve adı kısmına önceki formdan kimlik (kisi id) isimli metin kutusunun içeriğini almasını istiyorum. 
Buton Tıklama olayına;
Visual Basic
  1. DoCmd.OpenForm "frm11_sozlesmeAH"
  2. DoCmd.GoToRecord,,NewRec


yazınca istenilen oluyor. Ancak önceki formdan kişinin adını çekemiyorum. Tekrar elle seçmek zorunda kalıyorum. Bunun için butonun tıklama olayında;
Visual Basic
  1. Dim kisi as integer
  2. kisi = kimlik.text
  3. DoCmd.OpenForm "frm11_sozlesmeAH"
  4. DoCmd.GoToRecord,,NewRec 
  5. hekimKimlik = kisi


Şeklinde yöntem izledim olmadı.
OpenForm ile filtre denediğimde hekim adı gelirken yeni kayıt(acNewRec) yapamadım. Buton tıklama olayına;
Visual Basic
  1. DoCmd.OpenForm "frm11_sozlesmeAH", acNormal, , "[hekimKimlik]=" & Me.Kimlik, acFormEdit, acWindowNormal


yazdım. 

Yardımcı olabilirseniz sevinirim.



  Bul
  Alıntı
Bu mesajı beğenenler:
alperalper
Kıdemli Üye 400-1000

*
Kayıt Tarihi: 06.11.2013
Toplam 93 konu açtı.
Toplam 626 yorum yaptı.
Toplam 88 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016, Office 2019,
Beğeniler: 0 / 31
#2
09-11-2022, 19:40 (En son düzenleme: 10-11-2022, 08:10 alperalper.)
Aşağıdaki koda ek olarak.. Hekimkimlik denetiminin olduğu forma gelin. Hekimkimlik alanının güncelleme sonrası yordamına 


Visual Basic
  1. Private Sub hekimKimlik_AfterUpdate()
  2. hekimadi = DLookup("hekimadi", "TabloAdiniz", "hekimKimlik=" & FormÜstündekiKimlikDenetimAdi)
  3. hekimsoyadi= DLookup("hekimsoyadi", "TabloAdiniz", "hekimKimlik=" & FormÜstündekiKimlikDenetimAdi)
  4. digerbilgiler=""
  5. '//YUKARIDAKİ ALANLARIN SAYISINI ARTIRMANIZ MÜMKÜN. PERSONEL BİLGİSİNİN OLDUĞU TABLODAN HEKİMKİMLİK NUMARASINA GÖRE BÜTÜN BİLGİLERİ GETİREBİLİRSİNİZ.
  6. End Sub





şeklinde yazarsanız adı gelecektir. Eğer başka alan istiyorsanız bu şekilde alt alta bütün alanları çağırabilirsin. Bu dediğimi Hekimkimlik güncelleme sonrası yordamına yazacaksınız.  Yuyarıda belirttiğim hekimsoyadi, ve digerbilgi gibi bütün bilgiler getirilebilir. Tabi bu basit bir yöntem. Bunu yapabilmenin birçok yolu var. Örnek çalışma paylaşırsanız üzerinde çalışabiliriz. Filtre uyguladiğiniz form açılışı yalnızca mevcut kayıtları getirmek için işe yarayacaktır. Anladığım kadarı ile siz personel seçtiğinizde başka bir formda yeni bir kayıt oluştururken o personelin bilgilerinin gelmesini istiyorsunuz.

Visual Basic
  1. Dim kisi as integer
  2. kisi = kimlik.text
  3. DoCmd.OpenForm "frm11_sozlesmeAH"
  4. DoCmd.GoToRecord,,NewRec 
  5. hekimKimlik = kisi





  Bul
  Alıntı
Bu mesajı beğenenler:
meceka
Yeni Üye 15-40

*
Kayıt Tarihi: 26.01.2022
Toplam 5 konu açtı.
Toplam 16 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2019,
Beğeniler: 2 / 0
#3
10-11-2022, 10:12
(09-11-2022, 19:40)alperalper demiş ki: Anladığım kadarı ile siz personel seçtiğinizde başka bir formda yeni bir kayıt oluştururken o personelin bilgilerinin gelmesini istiyorsunuz.
Merhaba günaydın. Çok doğru. Bu işlemi yapmaya çalışıyorum. Dlookup ile yapmamı istediğiniz işlemi anlayamadım. Dosyayı ekledim.
Teşekkürler.



  Bul
  Alıntı
Bu mesajı beğenenler:
alperalper
Kıdemli Üye 400-1000

*
Kayıt Tarihi: 06.11.2013
Toplam 93 konu açtı.
Toplam 626 yorum yaptı.
Toplam 88 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016, Office 2019,
Beğeniler: 0 / 31
#4
10-11-2022, 12:07
(10-11-2022, 10:12)meceka demiş ki:
(09-11-2022, 19:40)alperalper demiş ki: Anladığım kadarı ile siz personel seçtiğinizde başka bir formda yeni bir kayıt oluştururken o personelin bilgilerinin gelmesini istiyorsunuz.
Merhaba günaydın. Çok doğru. Bu işlemi yapmaya çalışıyorum. Dlookup ile yapmamı istediğiniz işlemi anlayamadım. Dosyayı ekledim.
Teşekkürler.

Dosyanız yok.



  Bul
  Alıntı
Bu mesajı beğenenler:
meceka
Yeni Üye 15-40

*
Kayıt Tarihi: 26.01.2022
Toplam 5 konu açtı.
Toplam 16 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2019,
Beğeniler: 2 / 0
#5
10-11-2022, 13:53
Ekleri ekle dememişim sanırım. Ekledim. Buyrun;


Eklenti Dosyaları
.zip   1.zip (Boyut: 54,2 KB / İndirilme: 21)



  Bul
  Alıntı
Bu mesajı beğenenler:
alperalper
Kıdemli Üye 400-1000

*
Kayıt Tarihi: 06.11.2013
Toplam 93 konu açtı.
Toplam 626 yorum yaptı.
Toplam 88 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016, Office 2019,
Beğeniler: 0 / 31
#6
10-11-2022, 14:49
Sözleşme listesinden hangi sözleşmede düzenleme yapacaksan çift tıklayıp açabalirsin. sözleşme ekleye bastığın zaman da yeni kayıt oluşturarak gelir.


Eklenti Dosyaları
.rar   1.rar (Boyut: 49,58 KB / İndirilme: 23)



  Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] metin kutusu kaydırma onkay 5 1.917 27-12-2023, 13:24
Son Mesaj: dsezgin
  Metin Kutusu Adı Değiştirme Hk. snapper 9 233 08-11-2023, 01:12
Son Mesaj: dsezgin
  [TABLO] çoklu Birleşik Giriş Kutusu RASİMPEH 2 147 19-09-2023, 04:53
Son Mesaj: RASİMPEH
  Uzun Metin Formatını Sql De Kısa Metin Formatına çevirebilir Miyiz? adnnfrm 2 206 06-08-2023, 03:51
Son Mesaj: adnnfrm
  Metin Kutusu Boş Sa Diğer Metin Kutusundan Değer Alması özgülapt 4 261 29-05-2023, 18:01
Son Mesaj: feraz
  Formda Onay Kutusu Ile Veri Aktarma anno 7 383 24-11-2022, 23:02
Son Mesaj: onur_can
  [FORM] Birleşik Giriş Kutusu EminA 2 224 13-10-2022, 10:32
Son Mesaj: EminA
  Metin Kutusuna Girilen Bir Değeri Başka Metin Kutunda Arama farukozgursoy 3 248 18-09-2022, 09:31
Son Mesaj: alperalper

Foruma Git:


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