AccessTr.neT
Yetkilendirme problemi - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Yetkilendirme problemi (/konu-yetkilendirme-problemi.html)



Yetkilendirme problemi - asar800 - 11/09/2012

Selamlar
Ekteki dosyada kullanıcıya göre form açmak istiyorum fakat nasıl olduğunu çözemedim.45 kullanıcı var, bunlar 5 grup içerisinde bulunmaktadır.Herbir grubun herbir kullanıcısı ayrı ayrı formları açmak için yetkili olsun.Şu anda sadece admin ve user1 grubu yetkili(Dosyanın orjinalinde de bu böyleydi.). Herhalde acemilikten olsa gerek, bu problemi çözemedim.Yardım ederseniz sevinirim.

Anket_2.rar



Cvp: Yetkilendirme problemi - C*e*l*o*y*c*e - 11/09/2012

A.Selam

örneginizdeki kodları aşagıdaki gibi ve istediğiniz formları açma ve gizleme yapabilirsiniz
.........................
If Me.yetkigoster = "ADMİN" Then
Me.Etiket15.Caption = " Admin olarak oturum açtığınız için tam yetkiye sahipsiniz"
Me.A.Enabled = True
Me.B.Enabled = False
'....................
ElseIf Me.yetkigoster = "USER1" Then
Me.Etiket15.Caption = " USER1 olarak oturum açtığınız için bazı formları açamazsınız"
Me.C.Enabled = True
Me.D.Enabled = False
'....................
ElseIf Me.yetkigoster = "USER2" Then
Me.Etiket15.Caption = " USER2 olarak oturum açtığınız için bazı formları açamazsınız"
Me.E.Enabled = True
Me.F.Enabled = False
'....................
ElseIf Me.yetkigoster = "USER3" Then
Me.Etiket15.Caption = " USER3 olarak oturum açtığınız için bazı formları açamazsınız"
Me.G.Enabled = True
Me.H.Enabled = False
'....................
End If
..............................


Cvp: Yetkilendirme problemi - asar800 - 11/09/2012

Teşekkürler Celoyce. Ayrıca Mehmet Demiral'a da teşekkürler.