Skip to main content

AccessTr.neT


Formdan Forma Veri Aktarma

Formdan Forma Veri Aktarma

Çözüldü #1
Arkadaşlar selamlar. Başka bir konu açmak istemediğim için buraya sıkıntımı paylaşmak istedim.  Sorum açılan formdaki egzersiz alt formunda satırda onay kutusunda tıkladığım satır daki(hıd-sett-tekrar-agırlık) verılerının alttaki prgdetay alt formuna aktarılması.yardımlarınızı bekliyorum. 
.rar Antrenman Programı.rar (Dosya Boyutu: 37,36 KB | İndirme Sayısı: 22)
Cevapla
#2
açılan kutunun tıklandığında olayına yazılı kodları aşağıdakilerle değiştiriniz.

Visual Basic Code
DoCmd.SetWarnings False

DoCmd.RunSQL ("INSERT INTO PRGDETAY ( HID, SETT, TEKRAR, AGIRLIK, PRGID ) SELECT EGZERSİZ.HID, EGZERSİZ.SETT, EGZERSİZ.TEKRAR, EGZERSİZ.AGIRLIK, [Forms]![PRG_FRM]![PRGID] AS İfade1 FROM EGZERSİZ WHERE (((EGZERSİZ.HID)=[Forms]![PRG_FRM]![EGZERSİZ alt formu].[Form]![HID]));")
DoCmd.SetWarnings True
Forms![PRG_FRM]![PRGDETAY alt formu].Form.Requery


Ayrıca, onay kutusu her tıklandığında bu kod çalışacağı için ve tıklamada onay kutusu işaretleneceği için sıkıntı yaratabilir. Onay kutusu dolu ise kodun çalışması daha doğru olacaktır. Sonraki kayda geçildiğinde işaretli onay kutuları yine işaretli kalacak, bunun da kontrol edilmesi lazım. " ONAY KUTUSUNDA TIKLADIĞIM SATIR" dediğiniz için mevzuyu tam bilmediğim için başka düzeltme yapmadım.
"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 
Cevapla
#3
Sayın Ozan Bey ilginiz için teşekkürler. Dediğiniz gibi onay kutusu her tıkladığımda kod çalışıyor. Onay kutusu dolu ise kodun çalışması nasıl yapılacak bilgilendirirseniz memnun olurum.
Cevapla
#4
Visual Basic Code
If Me.ONAY = -1 Then

DoCmd.SetWarnings False
DoCmd.RunSQL ("INSERT INTO PRGDETAY ( HID, SETT, TEKRAR, AGIRLIK, PRGID ) SELECT EGZERSİZ.HID, EGZERSİZ.SETT, EGZERSİZ.TEKRAR, EGZERSİZ.AGIRLIK, [Forms]![PRG_FRM]![PRGID] AS İfade1 FROM EGZERSİZ WHERE (((EGZERSİZ.HID)=[Forms]![PRG_FRM]![EGZERSİZ alt formu].[Form]![HID]));")
DoCmd.SetWarnings True
Forms![PRG_FRM]![PRGDETAY alt formu].Form.Requery
End If
"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 
Cevapla
#5
ozan bey çok teşekkürler. program çalıştı istediğim gibi.
Cevapla
#6
Rica ederim. 

x sıradaki onay kutusunu işaretleyip alt forma veri aktardınız. sonraki kayda gittiğinizde işaretli onay kutuları aynı mı kalacak?
"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task