Skip to main content

AccessTr.neT


Veritabanında arama yapma ve log tutma

Veritabanında arama yapma ve log tutma

Çözüldü #5
uygulamaya tbl_kullaniciloglari isimli tablo ekledim.

log tutma ile ilgili olarak sadece kullanını girişi yapılan AÇILIŞ formuna

Sub KayitTut()
Dim rs As New ADODB.Recordset
rs.Open "tbl_kullaniciloglari", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rs.AddNew
rs("adisoyadi") = Me.kullanıcı.Column(1)
rs("islemzamanı") = now
rs("yapilanislem") = "Oturum Açıldı"
rs.Update
Set rs = Nothing
End Sub

kodu ekledim ve Komut29 tıklandığında şifre doğru ise çalışması için

call KayitTut
kodu ekledim.

diğer formdaki kayıt ekleme, kayıt silme gibi butonlara benzeri kod eklemen gerekiyor. Tablodaki yapilanislem alanına üstteki kodda oturum açıldığında "Oturum Açıldı" yazılıyor. Siz butonlardaki kodlara "kayıt silindi", "kayıt eklendi" şeklinde yazmalısınız.

.rar vaka_bilgileri.rar (Dosya Boyutu: 64,84 KB | İndirme Sayısı: 26)
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Cvp: Veritabanında arama yapma ve log tutma - Yazar: ozanakkaya - 15/06/2011, 16:09
Task