Log Tutma Örneğiyle ilgili iki istek?

23/11/2016, 10:16

prtkl

Merhabalar, 

Aşağıdaki linkte sayın Taruz'un hazırladığı, inanılmaz faydalı bulduğum, bir uygulamanın içeriğiyle ilgili birkaç değişiklik ihtiyacı duyduğum için bu konuyu açtım.
(https://accesstr.net/konu-kayitlarda-yap...rnegi.html)

İhtiyaçlarım:

1. Frm_Aliş ın sağ üst köşesine "Degistiren" adında bir text box yerleştirdim (örnek ekte). Formda değişikliği yapan kullanıcının kim olduğunu bu text box üzerinden herkes görsün istiyorum.
2. Eğer formda boş veri varsa ve bu doldurulmuşsa "modülün" bunu değişiklik olarak kabul edip boş yere "Tbl_Guncelleme_Kaydi" adlı tabloya kayıt yapmasını istemiyorum.

İyi Forumlar dilerim.
25/11/2016, 02:17

ozanakkaya

Forma eklediğiniz metin kutusunun denetim kaynağına aşağıdaki kodu yazarsanız değiştireni görebilirsiniz, ancak aynı kişiye ait birden fazla değiştirme kaydı var ise son kaydı gösterir.


=DLookUp("[kulanici_adi]";"Tbl_Kullanici";"[kul_id]=" & Nz(DLast("Kullanici";"Tbl_Guncelleme_Kaydi";"[KayitNo]='" & [PersonelNo] & "'");0))


Boş kayıtta değişiklik ile ilgili 2. sorunuz için

Kayit_casusu modülündeki


YeniData = Nz(Kontrol.Value, "Boş")

kodunun hemen altına

 If IsNull(Kontrol.OldValue) Then
Exit Function
End If


Kodu ekleyiniz.
25/11/2016, 11:07

prtkl

çok teşekkür ederim sayın ozanakkaya,

peki form da  "aktifkullanıcı" nın kim olduğunu göstermesi için textbox a ne yazmalıyım? (değişikliği yapmadan önce formu açan kim?)
26/11/2016, 09:20

ozanakkaya

(25/11/2016, 11:07)prtkl yazdı: çok teşekkür ederim sayın ozanakkaya,

peki form da  "aktifkullanıcı" nın kim olduğunu göstermesi için textbox a ne yazmalıyım? (değişikliği yapmadan önce formu açan kim?)

Forma "mtn_kullanici" adında metin kutusu ekle, formun açıldığında olayına aşağıdaki kodu ekle

Me.mtn_kullanici = Dlookup ("[kulanici_adi]", "Tbl_Kullanici", "[kul_id]=" & KullaniciKim)
28/11/2016, 09:35

prtkl

çok teşekkür ederim