(11/04/2021, 16:37)berduş yazdı: bahsettiğiniz şekilde olabilmesi için bazı değişiklikler yaptım
mesela metin kutuları ilişkisiz yapıldı
hazır makro yerine Vba kullanıldı
dilerim işinize yarar
With Me.Recordset
.AddNew
For Each fld In .Fields
If fld.Name <> "Kimlik" Then fld.Value = Controls(fld.Name).Value
Next fld
.Update
.Bookmark = .LastModified
End With
Kardeşim eline fikrine sağlık istediğim gibi olmuş sağol.