mrh arkadaşlar, evrak kayıt programında daha eskiye ait kayıtlara arama veya gezmi tuşları ile bakılabiliyor, lakin bazen maus bir kayda gelip harf ekleyebiliyor veya silebiliyor, düzenleme yetkisini kaldırıp kayıtları hiç düzeltilemez olmasınıda istemiyorum, istediğim formda eski kayıtlarda bir değişiklik yapıldığında kayıtlarda değişiklik yaptınız kaydedeyimmi iptal edeyimmi gibi bir seçenek nasıl sunabilirim.

Formlarınıza aşağıdaki kodu eklerseniz probleminiz çözülecektir.

Private Sub Form_BeforeUpdate(Cancel As Integer)

    ' formda yanlışlıkla bir veri üzerinde değişiklik yapmayalım diye

    ' değişiklik durumunda onay alıyoruz.



    If NewRecord = False Then

        If MsgBox("Değişiklikler kaydedilsin mi?", _

        vbYesNo) = vbNo Then

        Cancel = True

        DoCmd.RunCommand acCmdUndo

        End If

    End If

End Sub

Form Açılır özelliğine Metin kutularını kilitleyecek aşağıdaki kodu uyarla

Private Sub Form_Open(Cancel As Integer)

Me.AlanADI_1.Locked = True

Me.AlanADI_2.Locked = True

End Sub

Bir buton oluştur. Ben genelde buton ismini Duzenleme koyuyorum ona göre yazacağım.
Bu buton düzenleme yapılacağı zaman basıldığında değişim imkanı verecek, değişiklik yapıldıktan sonra tekrar basıldığında değişiklik yapma durumunu engelleyecektir.

Private Sub Duzenleme_Click()



If Me.Duzenleme.Caption = "Düzenleme Açık" Then

    Me.Duzenleme.Caption = "Düzenleme Kapalı"

Me.Duzenleme.ForeColor = vbBlack





Me.AlanADI_1.Locked = True

Me.AlanADI_2.Locked = True



Else



    Me.Duzenleme.Caption = "Düzenleme Açık"

Me.Duzenleme.ForeColor = vbBlue



       Me.AlanADI_1.Locked = False

       Me.AlanADI_2.Locked = False





    End If

End Sub

Arkadaşım verdiğin kodlar için teşekkür ederim, kodları uyarladım yalnız şöyle bir sorun ortaya çıktı, düzenleme yap butonuna tıklanmayınca yeni kayıt eklenmiyor ben eski kayıtların düzenlenme ve değişikliğinde olsun istiyorum, fikrin varmı

Kural hocamın verdiği kodları uyguladın mı?
Saygılar...

uyguladım, kodları çalıştırdım yalnız yeni kayıt açtığımda bu sefer işlem yapamıyorum düzenleme düğmesine tıklamadan, işlemin sadece eski kayıtlarda geçerli olmasını istiyorum