Kullanıcı Girişi

1 2
15/12/2018, 20:42

golf2000

Sayın.haliliyas Hocam 

Dediğiniz Gibi Tüm Kodları Dediğiniz Gibi "FRM_ANA" Geçerli Olduğunda Olayına Yazdım
Access Veritabanını açıp kapattım Tüm Kullanıcılar ile giriş yaptım Her Kullanıcıda da Butonlar Aktif Hale Geldi Olmadı

Teşekkürler
15/12/2018, 20:51

berduş

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
15/12/2018, 21:01

golf2000

Sayın.haliliyas Hocam

Eline Koluna Sağlık Çok Teşekkür Ederim 
Oldu Şimdi Çok Sağolun

Tekrar Tekrar Teşekkürler
1 2