+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: access klavye delete tuşuna erişimi yasaklama (/konu-access-klavye-delete-tusuna-erisimi-yasaklama.html)
Cvp: access klavye delete tuşuna erişimi yasaklama - atoz112 - 14/08/2015
Sayın ssdestek,
EK'te;bahsettiğiniz talebinize yönelik olarak hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.bilginize.
EKLENEN ÖRNEK HAKKINDA BİLGİLENDİRME (Yapılması gereken işlemler)
1) Asıl uygulamanıza adapte etmek için deleteengelle adlı modülü ekleyiniz.
2) Asıl uygulamanızdaki formların Yüklendiğinde olay yordamlarına
Kod:
deletetusuengelleme Me.Name3) Asıl uygulamanızda kayıt silme işlemini yapacağınız formun üzerindeki kayıt silme butonu içerisinde iken ilk satırlarına
Kod:
'KAYIT SİLME İZNİNİ ETKİNLEŞTİR
Me.AllowDeletions = True
Me.AllowAdditions = True
Me.AllowEdits = True4) Asıl uygulamanızda kayıt silme işlemini yapacağınız formun üzerindeki kayıt silme butonu içerisinde iken son satırlarına (End Sub satırının bir üzerine)
Kod:
'KAYIT SİLME İZNİNİ TEKRAR ETKİSİZLEŞTİR (DELETE TUŞUNU PASİFLEŞTİR)
Me.AllowDeletions = False
Me.AllowAdditions = False
Me.AllowEdits = FalseSon olarak,lütfen;bir mesajdan alıntı yapmak isterken,SADECE alıntıyı gerektirecek ana kısmı içeren ifadeleri dahil ediniz.tüm yazıyı mesajınızda kullanmamaya özen gösteriniz...iyi çalışmalar,saygılar.
Cvp: access klavye delete tuşuna erişimi yasaklama - ssdestek - 17/08/2015
(14/08/2015, 15:28)atoz112 yazdı: Sayın ssdestek,Merhaba, güzel şeyler yapmışsınız eline sağlık ama ben bir türlü beceremedim. Yapmak istediğim: FormAA formum üzerinde KAYIT SİL butonu var ve bir de TabloVeriler tablosu var. TabloVeriler den herhangi bir satırı seçince klavyeden DELETE tuşuna basınca silme işlemi YAPMASIN ama KAYIT SİL butonuna basınca silme işlemini yapabilsin hepsi bu. FormAA yı ekliyorum. Teşekkür ederim, saygılarımla,
EK'te;bahsettiğiniz talebinize yönelik olarak hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.bilginize.
EKLENEN ÖRNEK HAKKINDA BİLGİLENDİRME (Yapılması gereken işlemler)
1) Asıl uygulamanıza adapte etmek için deleteengelle adlı modülü ekleyiniz.
2) Asıl uygulamanızdaki formların Yüklendiğinde olay yordamlarına
kod ifadesini yazınız.Kod:deletetusuengelleme Me.Name
3) Asıl uygulamanızda kayıt silme işlemini yapacağınız formun üzerindeki kayıt silme butonu içerisinde iken ilk satırlarına
Kod ifadelerini ekleyiniz.Kod:'KAYIT SİLME İZNİNİ ETKİNLEŞTİR
Me.AllowDeletions = True
Me.AllowAdditions = True
Me.AllowEdits = True
4) Asıl uygulamanızda kayıt silme işlemini yapacağınız formun üzerindeki kayıt silme butonu içerisinde iken son satırlarına (End Sub satırının bir üzerine)
Kod ifadelerini ekleyiniz.Kod:'KAYIT SİLME İZNİNİ TEKRAR ETKİSİZLEŞTİR (DELETE TUŞUNU PASİFLEŞTİR)
Me.AllowDeletions = False
Me.AllowAdditions = False
Me.AllowEdits = False
Son olarak,lütfen;bir mesajdan alıntı yapmak isterken,SADECE alıntıyı gerektirecek ana kısmı içeren ifadeleri dahil ediniz.tüm yazıyı mesajınızda kullanmamaya özen gösteriniz...iyi çalışmalar,saygılar.
Cvp: access klavye delete tuşuna erişimi yasaklama - atoz112 - 17/08/2015
Sayın ssdestek,
Öncelikle eklediğiniz uygulama,”tanınmayan…” uyarısı verdiğinden dolayı tarafımdan inceleme imkanı olmamaktadır.
Bu nedenle,ya önceki sürüme göre farklı kaydet işlemini deneyip ya da aşağıda bağlantısı verilen konunun 4.mesajında yer alan hususları uygulayıp örneğinizi tekrar eklemeyi deneyiniz.
otel otomasyonu
Son olarak,
lütfen alıntı yapacağınız yazının veya mesaj içeriğinin tamamını değil de SADECE gerekli veya yeterli görülen kısmı kadar seçerek yazacağınız yeni mesajınızda yer vermeye özen gösteriniz.bilginize.
iyi çalışmalar,saygılar.
Cvp: access klavye delete tuşuna erişimi yasaklama - ssdestek - 18/08/2015
(17/08/2015, 19:59)atoz112 yazdı: Sayın ssdestek,Merhaba tekrar ekliyorum dosyayı
Öncelikle eklediğiniz uygulama,”tanınmayan…” uyarısı verdiğinden dolayı tarafımdan inceleme imkanı olmamaktadır.
Bu nedenle,ya önceki sürüme göre farklı kaydet işlemini deneyip ya da aşağıda bağlantısı verilen konunun 4.mesajında yer alan hususları uygulayıp örneğinizi tekrar eklemeyi deneyiniz.
Son olarak,
lütfen alıntı yapacağınız yazının veya mesaj içeriğinin tamamını değil de SADECE gerekli veya yeterli görülen kısmı kadar seçerek yazacağınız yeni mesajınızda yer vermeye özen gösteriniz.bilginize.
iyi çalışmalar,saygılar.
Cvp: access klavye delete tuşuna erişimi yasaklama - ssdestek - 18/08/2015
(18/08/2015, 08:02)ssdestek yazdı:farklı kaydedip, tekrar yolluyorum.(17/08/2015, 19:59)atoz112 yazdı: Sayın ssdestek,Merhaba tekrar ekliyorum dosyayı
Öncelikle eklediğiniz uygulama,”tanınmayan…” uyarısı verdiğinden dolayı tarafımdan inceleme imkanı olmamaktadır.
Bu nedenle,ya önceki sürüme göre farklı kaydet işlemini deneyip ya da aşağıda bağlantısı verilen konunun 4.mesajında yer alan hususları uygulayıp örneğinizi tekrar eklemeyi deneyiniz.
Son olarak,
lütfen alıntı yapacağınız yazının veya mesaj içeriğinin tamamını değil de SADECE gerekli veya yeterli görülen kısmı kadar seçerek yazacağınız yeni mesajınızda yer vermeye özen gösteriniz.bilginize.
iyi çalışmalar,saygılar.
Cvp: access klavye delete tuşuna erişimi yasaklama - KulAhmet - 18/08/2015
Private Sub Form_Load()
Me.Liste1.Form.RecordsetType = 2
End Sub
Private Sub Komut42_Click()
CurrentDb.Execute "delete * From Tablo1 where ((IDTablo1)=" & Me.Liste1.Form.Controls(0) & ")"
Me.liste1.Requery
End Sub
ile yapilabilir.