Skip to main content

AccessTr.neT


Kullanıcı Girişi

Kullanıcı Girişi

#8
FormCurrent olayına aşağıdaki kodları yazar mısınız?
sizin kodunuza ufak bir ekleme yaptım sadece
Private Sub Form_Current()

If Me.yetkigoster = "ADMİN" Then
Me.Etiket15.Caption = " Admin olarak oturum açtığınız için tam yetkiye sahipsiniz"
Me.FIRMA_SABITLERI.Enabled = True
Me.PERSONEL.Enabled = True
Me.FIYAT_DUZENLEME.Enabled = True
ElseIf Me.yetkigoster = "USER" Then
Me.FIRMA_SABITLERI.Enabled = False
Me.Etiket15.Caption = " User olarak oturum açtığınız için bazı formları açamazsınız"
Me.PERSONEL.Enabled = False
Me.FIYAT_DUZENLEME.Enabled = False
Else
Me.Etiket15.Caption = " Kısıtlı olarak oturum açtığınız için bazı formları açamazsınız"
Me.PERSONEL.Enabled = True
Me.FIRMA_SABITLERI.Enabled = True
Me.FIYAT_DUZENLEME.Enabled = False
Me.Komut10.Enabled = False
End If

End Sub
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Kullanıcı Girişi - Yazar: golf2000 - 15/12/2018, 19:05
Cvp: Kullanıcı Girişi - Yazar: berduş - 15/12/2018, 19:52
Cvp: Kullanıcı Girişi - Yazar: golf2000 - 15/12/2018, 20:10
Cvp: Kullanıcı Girişi - Yazar: berduş - 15/12/2018, 20:17
Cvp: Kullanıcı Girişi - Yazar: golf2000 - 15/12/2018, 20:24
Cvp: Kullanıcı Girişi - Yazar: berduş - 15/12/2018, 20:31
Cvp: Kullanıcı Girişi - Yazar: golf2000 - 15/12/2018, 20:42
Cvp: Kullanıcı Girişi - Yazar: berduş - 15/12/2018, 20:51
Cvp: Kullanıcı Girişi - Yazar: golf2000 - 15/12/2018, 21:01