hocam dediğinizi yaptım fakat bu defada kaydete bastığımda reçete arşivalt förmunda kayıt gözükmüyor kayboluyor....
Kayda Göre Numara Belirleme
alt formu protokol no ile bağladıysanız kaybolması normaldir.
bu durumda protokol noyu aldığınızda alt formdaki kayıtları da update sorgusu ile güncellemeniz gereklidir.
bu durumda protokol noyu aldığınızda alt formdaki kayıtları da update sorgusu ile güncellemeniz gereklidir.
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)
Bilgisayar Programcısı (1989'dan beri)
Yollar biter Access bitmez.
sayın yandemir hocam kaybolmak değilde kaydı kaydetmiyor. yani tablodada gözükmüyor. update ile çözülebilirmi bilmiyorum. ama açıkcası kaydetmediği için çözülebilir gib gelmiyor. bi örnekte ekleyebilirseniz sevinirim.
tşkler
tşkler
datayı kaydediyor sadece tek eksiğiniz. kaydettiğiniz tbl_reçete_arşiv tablosundaki satırlarda r_protokolno alanına "0" geliyor bu yüzden kaydetmiyor diye düşünüyorsunuz.
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)
Bilgisayar Programcısı (1989'dan beri)
Yollar biter Access bitmez.
hocam ekliyorum. sql_ekle_reçete_arşiv sorgusundaki alanı r_protokolno: [Formlar]![frm_personel]![Metin99] şeklinde yaptığımda frm,_personel reçete alanımdaki protokol no kısmmını genede elle yazıyorum. yok yazmazsam boş geçip kaydete tıklarsamda bu defa datayı kaydetmiyor arşivde çıkmıyor.... incelermisiniz ekden tşkler
sql_ekle_reçete_arşiv
INSERT INTO tbl_reçete_arşiv ( r_id, p_id, r_tarih, r_teşhis, r_protokolno, r_barkotno, r_ilaçadı, r_fiyat, r_diger, r_acıklama )
SELECT tbl_reçete.r_id, tbl_reçete.p_id, tbl_reçete.r_tarih, tbl_reçete.r_teşhis, tbl_reçete.r_protokolno, tbl_reçete.r_barkotno, tbl_reçete.r_ilaçadı, tbl_reçete.r_fiyat, tbl_reçete.r_diger, tbl_reçete.r_acıklama
FROM tbl_reçete;
frm_reçete_alt
Private Sub Form_Dirty(Cancel As Integer)
Me.r_protokolno = Forms!frm_Personel.Metin99
End Sub
şeklinde düzeltiniz.
INSERT INTO tbl_reçete_arşiv ( r_id, p_id, r_tarih, r_teşhis, r_protokolno, r_barkotno, r_ilaçadı, r_fiyat, r_diger, r_acıklama )
SELECT tbl_reçete.r_id, tbl_reçete.p_id, tbl_reçete.r_tarih, tbl_reçete.r_teşhis, tbl_reçete.r_protokolno, tbl_reçete.r_barkotno, tbl_reçete.r_ilaçadı, tbl_reçete.r_fiyat, tbl_reçete.r_diger, tbl_reçete.r_acıklama
FROM tbl_reçete;
frm_reçete_alt
Private Sub Form_Dirty(Cancel As Integer)
Me.r_protokolno = Forms!frm_Personel.Metin99
End Sub
şeklinde düzeltiniz.
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)
Bilgisayar Programcısı (1989'dan beri)
Yollar biter Access bitmez.
Konuyu Okuyanlar: 1 Ziyaretçi