Sil butonundaki 2 kodun açıklaması

[Orion1]

Merahaba.
Sil butonında aşağıdaki gibi 2 kod arka arkaya yazılmış.
Bu bir hatamıdır ,yoksa olması gereken bir durummu?
Birde acFormBar nedir?Her dosyada acFormBar olarakmı yazılıyor.Yoksa formun adımıdır?
Teşekkür ederim.

Private Sub Sil_Click()
On Error GoTo Err_Sil_Click


   [B][COLOR="Red"] DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70[/COLOR][/B]
    Me.Liste0.Requery
Exit_Sil_Click:
    Exit Sub

Err_Sil_Click:
    MsgBox Err.Description
    Resume Exit_Sil_Click
    
End Sub

 

[adnanyurdakul]

Sn Evren Gizlen bu komut Accessin önceki versiyonlarına ait bir kod
Üst sıra kayıt seçer alt satır ise seçilen satırı siler
Son sürümlerde bu komut
DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdDeleteRecord
şeklinde kullanılmaktadır.
Eski ve yeni sürüm kod karşılaştırmasını gönderiyorum


umarım işinize yarar

 

[Orion1]

Sn Evren Gizlen bu komut Accessin önceki versiyonlarına ait bir kod
Üst sıra kayıt seçer alt satır ise seçilen satırı siler
Son sürümlerde bu komut
DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdDeleteRecord
şeklinde kullanılmaktadır.
Eski ve yeni sürüm kod karşılaştırmasını gönderiyorum


umarım işinize yarar

Oldu .sizin verdiğiniz kodları uyguladım oldu.teşekkür ederim.
Ben 2003 kullanıyorum.Demkki 2003 e uyuyor.
Peki düzenlerken böyle seçme select kullanılmıyor.
Orada nasıl direk update yapıyor.Birde Bu kodunda 2003 versiyonu varsa onuda verebilirmisiniz.

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
            Me.Liste0.Requery

 

[adnanyurdakul]

size gönderdiğim word dosyasında hepsi var
sağ taraf 2007 i temsil eder
me.liste0.requery ise
listenin tekrar sorgulanarak yazılmasını sağlar

 

[Orion1]

size gönderdiğim word dosyasında hepsi var
sağ taraf 2007 i temsil eder
me.liste0.requery ise
listenin tekrar sorgulanarak yazılmasını sağlar

Peki silme butonunda 2 satır kod kullanmıştık.
Birisi seçiyordu diğeride siliyordu.
Bu önceki mesajımda kaydı kaydet butonunda ise 1 satır kod var bundada niye 2 satır yani bir tane seçen bir tanede yeni kaydı kaydeden yani kaydı güncelleyen kod yok?Bir yanlışlık yapmayalım.Ben bunları öğrenirken bunlar bana temel esas edicekler.Bir daha hep bu şekilde kullanıcam.
Teşekkür ederim.

 

[adnanyurdakul]

access te kaydetme işi otomotik olarak yapılır.ancak form üzerindeki kontroller bağımsız ise kaydet tuşuna ihtiyaç var.
Kaydı yapılmış bir alanın aynı sayfada aç kapa yapmadan görebilmemiz için o formun kayıt kaynağının tekrar yüklenmesi gerekir. buda requery ile olur.
2 satırlık kodları incelediğinizde hep otomasyondan gelen kodlar olduğunu görürsününz.Her duruma uyacak şekilde yazılmış.Başka bir şey değil.Tabii kayıt her zaman otomotik yaptırılmayabilir.yazma çakışmalarını önlemek için transection kullanmak halinde kayıt komut düğmesi ile yapılmalı
iyi çalışmalar

 

[Orion1]

Merhaba.
Ben sorumu anlatamadım.
Aşağıdaki kırmızı kodlarda 1 nci satırla kayıt seçiliyor.2nci satırla siliniyor.
Mavi satırda ise seçme işlemi yapılmıyor.seçme işlemi yapılmadan update (Kayıt) yapılıyor.Benim sormak istediğim niye birisnde seçme işelmi yapılıyorda diğerinde seçme işelemi yapılmıyor.Burada bir eksiklik yokmu.Eğer bir kayıt seçilip ondan sonra işlem yapılacaksa mavi kodlardad o kaydı seçmek gerekmiyormu.Eğer bir kayıtta seçme işlemine gerek yoksa kırmızı kodlardaki seçme işlemine gerek varmı?
Teşekkür ederim.

[B][COLOR="Red"]DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70[/COLOR][/B]

[B][COLOR="Blue"]DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70[/COLOR][/B]

 

[adnanyurdakul]

kayıt yaparken ayırım yapmadan her şeyi kaydediyor. Zira bunun bir zararı yok ama silme öğle değil netleşmeli o yüzden seçim yapıyor ve sonra siliyor

 

[Orion1]

kayıt yaparken ayırım yapmadan her şeyi kaydediyor. Zira bunun bir zararı yok ama silme öğle değil netleşmeli o yüzden seçim yapıyor ve sonra siliyor

Konuyu anladım.
Teşekkür ederim.İyi geceler.