+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Kayda Göre Numara Belirleme (/konu-kayda-gore-numara-belirleme.html)
Cvp: Kayda Göre Numara Belirleme - kesoka - 20/03/2011
hocam dediğinizi yaptım fakat bu defada kaydete bastığımda reçete arşivalt förmunda kayıt gözükmüyor kayboluyor....
Cvp: Kayda Göre Numara Belirleme - Yandemir - 20/03/2011
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.
Cvp: Kayda Göre Numara Belirleme - kesoka - 20/03/2011
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
Cvp: Kayda Göre Numara Belirleme - Yandemir - 20/03/2011
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.
Cvp: Kayda Göre Numara Belirleme - kesoka - 20/03/2011
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
Cvp: Kayda Göre Numara Belirleme - Yandemir - 20/03/2011
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.