Arşiv Oluşturmak,Verilerin Arşive Gönderilmesi-Mevcut Tablodan Silinmesi??

1 2
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.

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.Refresh


iyi çalışmalar,
saygılar.
26/02/2015, 14:58

atoz112

sayın mehami,

EK'te;yukarıda bahsi geçen kodları içeren örnek uygulama mevcuttur.inceleyebilirsiniz.bilginize.

iyi çalışmalar,
saygılar.
26/02/2015, 15:22

mehami

Çok tşk ediyorum..Allah razı olsun..

Konu çözüme kavuşmuştur..

Cevaplanmışlar bölümüne taşınabilir..

Saygılar..
1 2