AccessTr.neT
Yeni Kayıt Oluşmuyor - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Yeni Kayıt Oluşmuyor (/konu-yeni-kayit-olusmuyor.html)



Yeni Kayıt Oluşmuyor - ankaram - 11/04/2021

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.


RE: Yeni Kayıt Oluşmuyor - berduş - 11/04/2021

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



RE: Yeni Kayıt Oluşmuyor - ankaram - 11/04/2021

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


RE: Yeni Kayıt Oluşmuyor - berduş - 11/04/2021

Rica ederim
Iyi çalışmalar )


RE: Yeni Kayıt Oluşmuyor - berduş - 12/04/2021

dosya güncellenmiştir