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
..............................
Yetkilendirme problemi
Bu Konudaki Yorumlar |
Yetkilendirme problemi - Yazar: asar800 - 11/09/2012, 16:16
Cvp: Yetkilendirme problemi - Yazar: C*e*l*o*y*c*e - 11/09/2012, 20:10
Cvp: Yetkilendirme problemi - Yazar: asar800 - 11/09/2012, 20:53
|
Konuyu Okuyanlar: 1 Ziyaretçi