Private Sub Komut4_Click()
DoCmd.RunCommand acCmdSaveRecord
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO Fihrist-Pasif ([IDNO],[ADISOYADI]),[TCKIMLIKNO]),[KOGUSU]),[DURUMU]),[DOGUMYERI]),[DOGUMTARIHI]),[BABAADI]),[ANAADI]),[SUCU]),[GELISTARIHI]),[CIKILKGIRISTARIHI]),[KURUMUDAMI]),[TAHTARIHI]),[SEVKTARIHI]),[SEVKGITTIGICIK]),[VEFATTARIHI]),[VEFATNEDENI]),[FOTO]),[resim]),[IDDISIPLINCEZALARI]),[IDODUL]),[ODULGORUSUALDI]),[KIMLIKCIKARILDIMI]),[KIMLIKCIKARMATARIHI]),[IDHASIM]),[DISIPLINCEZASIALDIMI]),[MISAFIR]),[CALISANLAR]),[CALISTIGIBIRIM]),[TERORISTMI]),[IDTEROR]),[COCUKMU]),[KADINMI]),[KIMLIKVERILISNEDENI]),[MESLEGI]),[MEDENIDURUMU]),[DEFTERNO]),[KAYDEDILMESEBEBI]),[TOPLAMCEZASURESI]),[SARTLISALIVERILMESURESI]),[MAHSUBU]),[TAHLIYETARIHI]),[SARTLISALIVERMETARIHI]),[ACIKCIKAYRILMATARIHI]),[KOGUSDEGISIMTARIHI]) VALUES ('" & Me.IDNO & "','" & Me.ADISOYADI & "','" & Me.TCKIMLIKNO & "','" & Me.KOGUSU & "','" & Me.DOGUMYERI & "','" & Me.DOGUMTARIHI & "','" & Me.BABAADI & "','" & Me.ANAADI & "','" & Me.SUCU & "','" & Me.GELISTARIHI & "','" & Me.CIKILKGIRISTARIHI & "')"
DoCmd.SetWarnings True
Me.Tablo2alt.Requery
Me.CIKILKGIRISTARIHI ibaresinden sonra ekleme yapıldığında kodun rengi kırmızıya dönüyor
(08/08/2014, 14:20)ozguryasin yazdı: entegre etmek yerine anlayarak sıfırdan oluşturmanız daha mantıklı olacaktır. bir önceki mesajımda gönderdiğim kodlarda birinci kısım yeni tabloya kayıt ederken ikinci kısım ise yeni kayıt edilen bölümün kayıt işi bittikten sonra asıl tablodan kaydı silmekte. Fihrist tablonuzda fazla alan olması (ki tablolar yanlış hatırlamıyor isem 250 alana kadar problem çıkartmıyor.) sadece kod yazarken biraz daha fazla satır yazmak anlamına gelir.