Formda Butona aşağıdaki kodları düzenleyip uyguladım program çalışıyor. Kayıt yaptım tablolara ekledi. Fakat Formdan kaydet çıkarken ekli jpeg dosyasındaki hatayı veriyor. Bir türlü son yapmış olduğum değişikleri kayıt edemedim. Yardımlarınızı bekliyorum.Saygılarımla.
Private Sub Dergi_Tutar_Aktar_Click()
Dim Sql As String
sql = "INSERT INTO ödemeler ( kisi_id, adi_soyadi, Bölgesi,
[Semerkand Tutarı],[Aile Tutarı],[Mostar Tutarı],[Tek Dergi Tutarı],[Toplam Dergi Tutarı],tarih,Kalan, açıklama) values
(Forms!Dergi.kisi_id , Forms!Dergi.adı_soyadı, Forms!Dergi.Bölgesi, Forms!Dergi.semerkand_fiyatı, Forms!Dergi.Aile_fiyatı, Forms!Dergi.Mostar_fiyatı, Forms!Dergi.Tek_Dergi_fiyatı,Forms!Dergi.bos,date(),Forms!Dergi.bos,Forms!Dergi.bos)"
DoCmd.RunSQL sql
End Sub
Private Sub Yapılan_Ödeme_Aktar_Click()
Dim Sql As String
sql = "INSERT INTO ödemeler ( kisi_id, adi_soyadi, Bölgesi,[Ödenen],tarih)
values (Forms!Dergi.kisi_id , Forms!Dergi.adı_soyadı, Forms!Dergi.Bölgesi,
Forms!Dergi.ödenen,date())"
DoCmd.RunSQL sql
End Sub
[/vb]
53rize, 08-05-2010 tarihinden beri AccessTr.neT üyesidir.
Sn.53rize
Sn.BlackEagle'nin formdan butonla tabloya deger aktarma konusunda belirttiği gibi yapınızda hatalar var.
2010 da açılıyor ancak 2003 te Dergi formunuz hiç açılmıyor. Yol yakınken yapınızı tümüyle gözden geçirseniz daha iyi olacağı kanaatindeyim.
Toprağa her türlü kötü şey atılmasına rağmen
Topraktan hep güzel şeyler biter . (Akşemseddin)