Skip to main content

AccessTr.neT


Veritabanında arama yapma ve log tutma

Veritabanında arama yapma ve log tutma

Çözüldü #1
Değerli arkadaşlar,
Sitemizden örnekleri dikkatle inceledim ve ekte örneğini sunduğum "çağrı merkezi takip programı"na uyarlamaya çalıştım. Ancak üstadların kodlarını uyarlama yaparken bir yerlerde hata yapıyorum. Bu programda olması gerekenler şöyle :

1- Usta adminimiz sayın Ozan beyin FPS_sled1.rar (personel) programındaki gibi arama yaptıramıyorum.

2-Kullanıcı adı ve şifre tanımladım, bu formun açılışta gelmesini ve kullanıcı loglarının tutulmasını istiyorum.

3-Bir kez veri girişi yapıldıktan sonra geriye dönük olarak verilerin admin yetkisi olanların dışında değiştirilememesi gerekiyor.

desteklerinizi bekliyor, saygılar sunuyorum.

Not:Bu veritabanını böldüm ve 4 ayrı PC de kullanıyoruz.
.rar vaka_bilgileri.rar (Dosya Boyutu: 171,14 KB | İndirme Sayısı: 26)
İlmiyle amel etmeyen hoca bülbül gibi ötse de kargayla bir tut.
Son Düzenleme: 14/06/2011, 16:52, Düzenleyen: aobendes.
Cevapla
Çözüldü #2
Dar bir zamanda bu kadar yapabildim. Böyle bir şey mi istiyorsunuz.
Kullanıcı girişlerini sorgu yaptım oradan görebilirsiniz.
.rar vaka_bilgileri.rar (Dosya Boyutu: 164,76 KB | İndirme Sayısı: 40)
nsahin, 16-11-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #3
sayın NSahin,

Öncelikle ilginize teşekkür ederim.
Tamam hangi kullanıcının hangi saatte giriş yaptığını görebilyoruz. Ama, bize asıl gerekli olan, kullanıcının vaka_bilgileri tablosunda ne tür bir işlem yaptığıdır. (Kayıt ekleme, silme, veri girişi vb)

Şimdiden teşekkürler.
İlmiyle amel etmeyen hoca bülbül gibi ötse de kargayla bir tut.
Cevapla
Çözüldü #4
Hocalarımız bugün grevde herhalde.. 2 gündür online olmuş bekliyorum.
İlmiyle amel etmeyen hoca bülbül gibi ötse de kargayla bir tut.
Cevapla
Çö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
Çözüldü #6
Hocam çok teşekkürler, ancak kullanıcı adı ve şifre ile bu kez de giriş yaparken
ekteki hatayı alıyorum. Bir referans eksikliğinden mi kaynaklanıyor sizce ?

Bir konu da sizin daha önce örnek olarak verdiğiniz "kayıt arama" uygulamasını FPS_sled1.rar kendi programımda başaramadım.

saygılarımla,
İlmiyle amel etmeyen hoca bülbül gibi ötse de kargayla bir tut.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task