MYetkiler modulünde tanımladığım;
Global KullaniciNum As Integer
Global KullaniciAdi As String
Global YetkiNum As Integer
Global BolgeAdi As String
değişkenleri tüm program boyunca kullanılacağından değerleri Kullanıcı Giriş formundan sonra almaktadır.
Ancak; herhangi bir Run_time error kod hatası durumunda değerler resetlenmektedir. İstediğim; hata olsa dahi girişte atanan bu değerler değişmesin. (Örnek oluşsun diye Giriş Formu-İşler Listesi 19/A 'Deneme 1' çift tıklayınca gelen İş Bilgileri Formu-Haftalık Rapor sekmesinde 'Yazdır' butonuna tıklayınca hata oluşturdum.)
Global Değişken
Kullanıcı giriş kontrol penceresinde saklamak istediğiniz değerler adedince metin kutusu oluşturun. Giriş işlemi başarılı ise bu metin kutularına istediğiniz değerleri yazın ve giriş penceresini gizleyin.
Herhangi bir formda herhangi bir işlemde bu değerleri kullanmadan önce Null kontrolü yapın:
şeklinde eğer KullaniciAdi değişkeninin değeri boş ise gizlenen Giriş Kontrol Formundaki metin kutusundan değeri alıp tekrar Public değişkene atama yapın.
NOT : Global anahtar kelimesi yerine artık Public kullanılıyor. Eski destekleniyor ancak siz Public kullanırsanız daha iyi olur.
Herhangi bir formda herhangi bir işlemde bu değerleri kullanmadan önce Null kontrolü yapın:
If Isnull(KullaniciAdi) or KullaniciAdi="" Then
KullaniciAdi = Forms!frmGirisFormu.txtKullaniciAdi
End If
şeklinde eğer KullaniciAdi değişkeninin değeri boş ise gizlenen Giriş Kontrol Formundaki metin kutusundan değeri alıp tekrar Public değişkene atama yapın.
NOT : Global anahtar kelimesi yerine artık Public kullanılıyor. Eski destekleniyor ancak siz Public kullanırsanız daha iyi olur.
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Sn.alpeki99;
Önerdiğiniz yolu kullanarak sorunumu çözdüm...Teşekkür ederim....
Önerdiğiniz yolu kullanarak sorunumu çözdüm...Teşekkür ederim....
Konuyu Okuyanlar: 1 Ziyaretçi