Skip to main content

AccessTr.neT


Kullanıcı Yetkisine Göre Form Açtırmak

Kullanıcı Yetkisine Göre Form Açtırmak

Çözüldü #8
Kod:
Function Yetki(F As Form)

Dim SonKayit As String
Dim Yetki As String
Dim ctl As Control

SonKayit = DMax("[ID]", "[tblKullaniciLoglari]")
Yetki = DLookup("[txtKullaniciYetkisi]", "[tblKullaniciLoglari]", "[ID]=" & SonKayit)

If Yetki = "Yönetici" Then
Else

F.AllowAdditions = False
F.AllowDeletions = False
F.AllowEdits = False

End If

Fonksiyonu çağırırken de
Yetki me
şeklinde çağırmayı dene.
Bana işe yarayan bir müdür göster,sana dünyayı yerinden oynatayım.
                                                                                        Descartes


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
Cvp: Kullanıcı Yetkisine Göre Form Açtırmak - Yazar: Bilgisayarcı - 01/02/2009, 23:16
Task