AccessTr.neT

Tam Versiyon: Yetkilendirmede Sorun Yaşıyorum
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
Üstadlar, arkadaşlar merhaba
Ekte yapmaya çalıştığım programı gönderiyorum. Neredeyse tamamen bu siteden öğrendiklerim ile yaptım. Bunun için site sahiplerine ve siteye katkıda bulunanlara çok tşk ediyorum.

Yapmak istediğim şey şu,
123 kullanıcısı ADMİN (Şifre;123)
321 kullanıcısı USER (Şifre; 321)

ADMİN kullanıcısı, kayıt sayfasındaki bütün butonları görsün ama USER kullanıcısında Kayıt Sil ve Yedekleme Yap butonları aktif olmasın.

Bunun için biraz çalıştım ama FKayit formunda bunu beceremedim, forma girdiği zaman Kullanıcı adı ve Kullanıcı Yetkisi FKayit sayfasında görünmüyor bundan dolayı da bahsettiğim yetkilendirme olmuyor.

Yardımlarınızı bekliyorum.
- Modül2'ye
Global KullaniciYetkisi As String
kodu eklendi
- Şifre formundaki kullanıcı açılan kutusunun sütun sayısı 4, sütun genişlikleri 0cm;1cm;0cm;0cm yapıldı
- Şifre formundaki giriş butonunun tıklandığında olayına
KullaniciYetkisi = Me.kullanıcı.Column(3) 
kodu eklendi,
- Kayıt formunun geçerli olduğunda olayına
If KullaniciYetkisi = "KULLANICI" Then
Me.KaydiSil.Visible = False
Me.Komut85.Visible = False
Else
Me.KaydiSil.Visible = True
Me.Komut85.Visible = True
End If
kodu eklendi

sld_Veri Analiz Programı V. 2.0.rar
ozan hocam, elinize sağlık istediğim gibi olmuş yalnız, Access pencere gizleme olayı kalkmış, formların çoğu silinmiş, tablolarım silinmiş, onları yaparsam program çalışmaz mı?
(13/04/2012, 16:52)gozlemci_44 yazdı: [ -> ]ozan hocam, elinize sağlık istediğim gibi olmuş yalnız, Access pencere gizleme olayı kalkmış, formların çoğu silinmiş, tablolarım silinmiş, onları yaparsam program çalışmaz mı?

Ben tablo veya form silmedim. şifre formunun açıldığında olayına yazılı
fSetAccessWindow (SW_HIDE)
kodunun başına ' ekledim. ' işaretini silersen pencere tekrar gizlenir.
"Veri Analiz" i görünce farklı bir uygulamanızda düzenleme yapmışım. Siz 2. mesajdaki işlemleri veritabanınızda uygulayınız. Yapamazsanız yardımcı oluruz.
Tekrar tşk ederim. Deniyecem, olumlu/olumsuz dönerim...
Sayfalar: 1 2