Skip to main content

AccessTr.neT


Açılan Kutuda Kullanıcının Veri Değiştirmesini Engelleme

Açılan Kutuda Kullanıcının Veri Değiştirmesini Engelleme

Çözüldü #1
FsYetkili Alt Formda  SyKayitTur ve SyDurum alanlarına veri girişini kullanıcaya göre değiştirmesini engelleyebilirmiyiz. Her Kullanıcı kendi verisini değiştirsin.

[Resim: do.php?imgf=15251683021231.jpg]
.rar 30.04.2018.rar (Dosya Boyutu: 531,91 KB | İndirme Sayısı: 3)
Cevapla
#2
Private Sub SyDurum_AfterUpdate()

If Me.SyAdi <> Dlookup ("kulanici_adi", "TKullanicilar", "kul_id=AktifKullanici()") Then

MsgBox ("Bu Kaydı Değiştirme Yetkiniz Bulunmamaktadır .....")
Me.Undo
Exit Sub

Else

Select Case Right(SyDurum, 0)
Case "_rp"
DoCmd.OpenReport Me.SyDurum, acViewReport
Case "frm"
DoCmd.OpenForm Me.SyDurum
End Select

End If


End Sub


Private Sub SyKayitTur_AfterUpdate()

If Me.SyAdi <> Dlookup ("kulanici_adi", "TKullanicilar", "kul_id=AktifKullanici()") Then

MsgBox ("Bu Kaydı Değiştirme Yetkiniz Bulunmamaktadır .....")
Me.Undo

End If


End Sub
Cevapla
Çözüldü #3
Hocam teşekkür ederim sorunum düzeldi.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task