Skip to main content

AccessTr.neT


Düzenleme Kilidini Çözme

Düzenleme Kilidini Çözme

#2
sayın notrino,

bahsettiğiniz talebinize yönelik olarak;

ilgili etiketin TIKLANDIĞINDA olay yordamı içerisine
Dim sifrenedir As String
sifrenedir = InputBox("Şifreyi giriniz", "ŞİFRE GİRİŞİ")
If sifrenedir = "deneme" Then
Me.AllowEdits = True
Else
Me.AllowEdits = False
Exit Sub
End If
yukarıdaki kodları ve KAYDET butonu içerisine de
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Me.AllowEdits = False
kodlarını yazınız.

son olarak;naçizane bir de tavsiyede bulunmak isterim.

lütfen,uygulamalarınızda KATIŞTIRILMIŞ MAKRO kullanmak yerine OLAY YORDAM eklemek sureti ile kod yazmayı tercih ediniz ki aynı zamanda kod yazma üzerine gelişim elde edebilesiniz.

bilginize...iyi çalışmalar,saygılar.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
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
Düzenleme Kilidini Çözme - Yazar: notrino - 04/05/2016, 14:55
Cvp: Düzenleme Kilidini Çözme - Yazar: atoz112 - 04/05/2016, 15:23
Cvp: Düzenleme Kilidini Çözme - Yazar: notrino - 04/05/2016, 15:29
Task