Access açılırken Shift tuşunu etkisiz hale getirme.

[modalı]

Bilindiği gibi Shift tuşu basılı iken Access çalıştırılırsa Başlangıç yolu ve Formu etkisiz hale gelir. Eğer Shift tuşunun etkisini kaldırmak istiyorsak. Başlangıçta çalışacak bir modülün içine aşağıdaki VB kodunu yazabiliriz.
Hatta şifre ekleyerek bu modülün çalışmaması için kullanıcı tanımlayabiliriz.

Eklenecek kod şu şekilde:

Sub SetDBProperties
Dim db as Database
Dim prp as Property

Set db = CurrentDB()
Set prp = db.CreateProperty("AllowBypassKey", dbBoolean, False)
db.Properties.Append prp

End Sub

 

[ledman]

sayın modalı ilgili kod u yazdım ve shift tuşunun işe yaramadığını gördüm eline sağlık.fakat komutları silip shift tuşunu aktif etmek istedim başaramadım? :?

 

[karaayhan]

Hatta şifre ekleyerek bu modülün çalışmaması için kullanıcı tanımlayabiliriz.
[/code]

Modülün çalışmaması için şifreyi nasıl ekleyeceğiz örnek lütfen


Sayın Ledman,

Yanılıyorsam düzeltsin sayın modalı,
False yazan yeri True yaparsanız shift tuşu tekrar etkin olur....