Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
20/07/2009 17:34
Konu Sahibi
hasanzengi
Yorumlar
6
Okunma
14108
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

hasanzengi

Üye
Üye
 44
 14
 5
 03/07/2009
0
 İstanbul
 
 Ofis 2000
 21/09/2011,17:08
Çözüldü 
Arkadaşlar, merhaba ben bu forma yeni katıldım, yaklaşık iki haftadır bir stok yönetim programı yazıyorum, accesde kullanıcılar oluşturmak, şifreler tanımlamak ve tabloları, formları kullanıcıya göre yetkilendirmek istiyorum.
Bu konuda yardımcı olabilirmisiniz.
Teşekkürler


hasanzengi, 03-07-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

ozanakkaya

sledgeab
Kurucu
OZ.... AK....
 41
 11.274
 464
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Bugün,14:19
Çözüldü 
aşağıdaki konuları incele

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

Kullanıcı Hesapları Hakkında Yardım

Açılışta Kullanıcı Adı ve Parola Sorma

konuları inceleyerek çözüm bulamazsanız takıldığınız yerleri bu konuya yazın.


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

Kullanici Avatari

hasanzengi

Üye
Üye
 44
 14
 5
 03/07/2009
0
 İstanbul
 
 Ofis 2000
 21/09/2011,17:08
Çözüldü 
Ok teşekkürler, şifreli giriş ve şifre kontrolunu yaptırdım, yalnız doğru şifre ile kullanıcı girdiğinde ayrı bir makro ile belirlediğim yetkili formları açsın istiyorum, ama aşağıdaki komut yerine yazamıyorum, "şifre" adlı oluşturduğum macroyu nasıl çalıştırabilirim, yardımcı olabilirmisiniz.
şifre makrosunu aşağıya ekledim

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Private Sub Command5_Click()
    If IsNull(Me.Kullanıcı) Or Me.Kullanıcı = "" Then
            MsgBox "Lütfen Kullanıcı Adı Giriniz.", vbOKOnly + vbInformation, "Bilgilendirme Penceresi"
            Me.Kullanıcı.SetFocus
        Exit Sub
    End If
    If Me.Şifre.Value = DLookup("KULLANICIŞİFRESİ", "KULLANICILAR", "[ID]=" & Me.Kullanıcı.Value) Then

        ID = Me.Kullanıcı.Value
       
        Me.Form.Visible = False
     DoCmd.RunMacro "şifre", acNormal
        Else
        MsgBox "Hatalı Şifre! Lütfen Tekrar Deneyiniz", vbOKOnly + vbCritical, "Bilgilendirme Penceresi"
        Me.Şifre.SetFocus
    End If
    intLogonAttempts = intLogonAttempts + 1
    If intLogonAttempts > 2 Then
        MsgBox "KAPATILACAK.", vbCritical, "Bilgilendirme Penceresi"
        Application.Quit
    End If
End Sub


resim


hasanzengi, 03-07-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

ozanakkaya

sledgeab
Kurucu
OZ.... AK....
 41
 11.274
 464
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Bugün,14:19
Çözüldü 
hasanzengi, örneğinizi ekleyiniz.

Hızlı Cevap Almanın Püf Noktaları


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

Kullanici Avatari

mehmetdemiral

.
Uzman
ME.... DE....
 53
 4.890
 213
 30/10/2008
 Samsun
 Öğretmen
 Ofis 2013 32 Bit
 Dün,22:15
Çözüldü 
Benim size önerim, bu işlemler için makro kullanmayın. Vb kodlarıyla hallederseniz daha az sorun yaşar ve daha doğru bir çözüm üretmiş olursunuz. Benim önerim case kullanılmasıdır. Hiç bir şey yapamam, ille de makrolar kullanacağım derseniz de modül olarak kaydedip, kodlarını kullanın.


İnadına, ille de Accesstr.net...

Kullanici Avatari

ozanakkaya

sledgeab
Kurucu
OZ.... AK....
 41
 11.274
 464
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Bugün,14:19
Çözüldü 
Ayrıca, makroya 3 kullanıcı için koşul yazmışsın, bu şekilde 4 kullanıcı eklediğinde makroyu açıp 4. koşulu eklemen gerekecek.

şifre formuna kullanıcının yetkisini yazan metin kutusu ekle, kullanıcı adı seçildiğinde bu metin kutusuna "column" kullanarak yetkiyi aktar.

Kod:
MetinKutusuAdi = KULLANICIADI.Column(3)


daha sonra mehmet hocamın dediği gibi case kullanarak yetkiye göre form açtır.

yukarıda verdiğim linklerden birindeki örnek (ornekgiris) bu şekilde yapıldı.

https://www.accesstr.net/konu-kullanici-...ardim.html

7. mesaj


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Raporda Kullanıcı Id Yerine Ad Ve Soy Adını Nasıl Gösterebilirim. 001hacker 2 72 18/09/2018, 18:07
Son Yorum: 001hacker
Çözüldü Ağda Dosyayı Çoklu Kullanıcı İle Paylaşmak m_demir 6 195 17/08/2018, 15:42
Son Yorum: m_demir
Çözüldü Birden Fazla Tabloya Kayıt Yapmak m_demir 9 373 28/05/2018, 01:10
Son Yorum: m_demir
Çözüldü Kullanıcı Şifre Değiştirme oosmaner 1 159 15/05/2018, 17:34
Son Yorum: emir ustaoğlu
Çözüldü Şifre İle Giriş melek82 2 237 18/04/2018, 14:47
Son Yorum: melek82

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.