Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
01/05/2018 12:54
Konu Sahibi
hey
Yorumlar
2
Okunma
411
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
hey

hey

Aktif Üye
92224
he.... he....
 36
 12
 45
 24/09/2017
0
 Ankara
 Serbest
 Diğer
 26/05/2019,15:18
Çözüldü 
FsYetkili Alt Formda  SyKayitTur ve SyDurum alanlarına veri girişini kullanıcaya göre değiştirmesini engelleyebilirmiyiz. Her Kullanıcı kendi verisini değiştirsin.

[Resim: do.php?imgf=15251683021231.jpg]




ozanakkaya

ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 482
 12.116
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 19/07/2019,20:59

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
Private Sub SyDurum_AfterUpdate()

If Me.SyAdi <> DLookup("kulanici_adi", "TKullanicilar", "kul_id=AktifKullanici()") Then

    MsgBox ("Bu Kaydı Değiştirme Yetkiniz Bulunmamaktadır .....")
    Me.Undo
    Exit Sub

Else

    Select Case Right(SyDurum, 0)
        Case "_rp"
            DoCmd.OpenReport Me.SyDurum, acViewReport
        Case "frm"
            DoCmd.OpenForm Me.SyDurum
    End Select

End If


End Sub


Private Sub SyKayitTur_AfterUpdate()

If Me.SyAdi <> DLookup("kulanici_adi", "TKullanicilar", "kul_id=AktifKullanici()") Then

    MsgBox ("Bu Kaydı Değiştirme Yetkiniz Bulunmamaktadır .....")
    Me.Undo
    
End If


End Sub


"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. 

...........
hey

hey

Aktif Üye
92224
he.... he....
 36
 12
 45
 24/09/2017
0
 Ankara
 Serbest
 Diğer
 26/05/2019,15:18
Çözüldü 
Hocam teşekkür ederim sorunum düzeldi.




Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Açılan Kutuda Verilerin Görünmesi m_demir 7 293 15/05/2019, 23:27
Son Yorum: halily
Çözüldü Açılan Kutuda Verileri Sıralamak m_demir 2 174 10/05/2019, 12:08
Son Yorum: m_demir
Çözüldü Her Kutuda Otomatik Numarayı Yeniden Başlatma Yunus Bozkurt 3 364 30/03/2019, 23:03
Son Yorum: halily
Çözüldü Liste Kutusu Yada Açılan Kutu Hakkında programmer67 6 350 26/03/2019, 15:21
Son Yorum: programmer67
Çözüldü Access 2010 Da Açılan Proje Access 2016 Da Açılmıyor.(Her İki Bilgisayarda 64 Bit) Oğuz Türkyılmaz 2 203 05/03/2019, 17:06
Son Yorum: halily

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