(05/12/2017, 15:53)akses7989 yazdı: sorunu çözmede yardımcı olabilir misiniz?

aktar butonunun olay yordamına yazılan kod 
Formunuzdaki aktar düğmesine bu prosedürü yazınız..
 VBA Kodu
Private Sub Komut86_Click() 'Butonun tıklandıgı olay yordamı

Dim rs As New ADODB.Recordset

rs.Open "tbl_begendirmeler ", CurrentProject.Connection, 1, 3

rs.AddNew

rs(1) = Me.id 'kaydedilecek alan adı sıra no su

rs(2) = Me.begenid

rs(3) = Me.baslikid

rs(4) = Me.alanlar

rs(5) = Me.personel

rs(6) = Me.ANACLAR

rs.Update

rs.Close

Set rs = Nothing
End Sub

Prosedürün çalışması için yine Vba editörü menüsüne bulunan Tools / References penceresinden Microsoft ActiveX Data Objects 6.0 Library onay kutusunu seçmeyi unutmayınız..
düzenlenmiş şekli ektedir