26/02/2015, 14:49
atoz112
sayın mehami,
aldığınız hatanın nedeni;
eklediğiniz kodlamanın doğru yazılmamasından kaynaklı olduğu görülmektedir.
gerekli düzenlemeleri yapılmış olan aşağıdaki kodu,ilgili butonun içeriği ile değiştirdiğiniz takdirde,istediğiniz sonucu elde edeceksinizdir.bilginize.
iyi çalışmalar,
saygılar.
aldığınız hatanın nedeni;
eklediğiniz kodlamanın doğru yazılmamasından kaynaklı olduğu görülmektedir.
gerekli düzenlemeleri yapılmış olan aşağıdaki kodu,ilgili butonun içeriği ile değiştirdiğiniz takdirde,istediğiniz sonucu elde edeceksinizdir.bilginize.
Kod:
DoCmd.RunCommand acCmdSaveRecord
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO ARSİV_TABLOSU (adsoyad,tc,dosyano,sagliktani,ekyetersizlik, egitseltanisi,egitselokul_karari,okulu,okulcinsi,sinif,cinsiyet,tel,adres,destekegitim, destekraporu_bitis,destek_1ayonce,skr_1aySonrabitecek,skr_bitis,uygulanantest,testor,randevu, degerlendiren,kaynastirmagrubu,ilkdefa,kurula_gonder,kurul_no,kurul_tarihi,randevu_saati, dogum_tarihi,rapor_durumu)" _
& "SELECT tbl_hepsi.adsoyad, tbl_hepsi.tc, tbl_hepsi.dosyano, tbl_hepsi.sagliktani, tbl_hepsi.ekyetersizlik, tbl_hepsi.egitseltanisi, tbl_hepsi.egitselokul_karari, tbl_hepsi.okulu, tbl_hepsi.okulcinsi, tbl_hepsi.sinif, tbl_hepsi.cinsiyet, tbl_hepsi.tel, tbl_hepsi.adres, tbl_hepsi.destekegitim, tbl_hepsi.destekraporu_bitis, tbl_hepsi.destek_1ayonce, tbl_hepsi.skr_1aySonrabitecek, tbl_hepsi.skr_bitis, tbl_hepsi.uygulanantest, tbl_hepsi.testor, tbl_hepsi.randevu, tbl_hepsi.degerlendiren, tbl_hepsi.kaynastirmagrubu, tbl_hepsi.ilkdefa, tbl_hepsi.kurula_gonder, tbl_hepsi.kurul_no, tbl_hepsi.kurul_tarihi, tbl_hepsi.randevu_saati, tbl_hepsi.dogum_tarihi, tbl_hepsi.rapor_durumu FROM tbl_hepsi WHERE tbl_hepsi.ID=" & Me.IDm
DoCmd.RunSQL "DELETE * FROM tbl_hepsi WHERE tbl_hepsi.ID=" & Me.IDm
DoCmd.SetWarnings True
Me.Requery
Me.Refreshiyi çalışmalar,
saygılar.