20/03/2011, 00:26
20/03/2011, 01:33
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.
20/03/2011, 01:56
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
20/03/2011, 02:28
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.
20/03/2011, 02:43
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
20/03/2011, 03:02
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.