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 ifadesini yazınız.

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.

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.

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.

(14/08/2015, 15:28)atoz112 yazdı: 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.Name

kod ifadesini yazınız.

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:

'KAYIT SİLME İZNİNİ ETKİNLEŞTİR
Me.AllowDeletions = True
Me.AllowAdditions = True
Me.AllowEdits = True

Kod ifadelerini ekleyiniz.

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:

'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

Kod ifadelerini ekleyiniz.

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.

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,

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.
 

(17/08/2015, 19:59)atoz112 yazdı: 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.

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.
 

Merhaba tekrar ekliyorum dosyayı

(18/08/2015, 08:02)ssdestek yazdı:

(17/08/2015, 19:59)atoz112 yazdı: 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.

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.
 

Merhaba tekrar ekliyorum dosyayı

farklı kaydedip, tekrar yolluyorum.

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.