Lütfen konu başlıklarınızı ve mesajlarınızı TÜRKÇE yazınız. Güzel Türkçemizde "Ilgili, yardimci, girmis, silmis, düzeltmis" gibi kelimeler yok.
Sorunuza gelince.
Formdaki metin kutularının değiştiğinde olayına
Kod:
Private Sub Manpower_Company_Change()
Dim rs As New ADODB.Recordset
rs.Open "tbllog", CurrentProject.Connection, _
adOpenKeyset, adLockOptimistic
rs.AddNew
rs("Time") = Time
rs("Username") = "Kullanıcı Adı"
rs("Log") = Me.Manpower_Company & "verisi değiştirildi"
rs.UpdateEklediğin örnekte kullanıcı adı olayı olmadığı için sadece "Kullanıcı Adı" yazdım.
kaydet ve sil butonları ekleyip, kodu bu butonların tıklandığında olayına yazarsan veri ekleme ve silme logu tutabilirsin.
