Sayın atoz112, Komut358 aşağıdaki kodu ekledim. kurban tablosuna ekleme yapmadı. hata da vermiyor. Acaba nerede hata yapıyorum. Bu kısmı iki gündür araştırmama rağmen aşamadım. yardımlarınızı bekliyorum.
Private Sub Komut358_KeyUp(KeyCode As Integer, Shift As Integer)
DoCmd.RunCommand acCmdSaveRecord
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO kurban_tablo ([krbn_küpe_no],[Sat_hisse_adet]) VALUES ('" & Me.Küpe_no & "','" & Me.adet & "')"
DoCmd.SetWarnings True
End Sub
53rize, 08-05-2010 tarihinden beri AccessTr.neT üyesidir.
Son Düzenleme: 16/03/2015, 17:55, Düzenleyen: 53rize.