Slm plakadan veri getiriryorum.Ama gelen verilerdeki değişiklikleri yaptıktan sonra yeni kayıt oluşturduğumda eski kayıtın üzerine yazıyor.Ben eskide olsun yenide olsun istiyorum.Şimdiden teşekkürler.

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

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

Rica ederim
Iyi çalışmalar )

dosya güncellenmiştir