Kayıt sil işlemi

[aksoyahmet1]

kayıt sil butonuna tıklayınca bir kaydı silmek üzeresiniz uyarısını ve sonrasını access hata kodu veriyor ama bunu bizim göstereceğimiz bir hata kodu nasıl gösterebiliriz.yardımlarınız için teşekkürler

 

[attila52]

Sİlme İŞlemİ

kayıt sil butonuna tıklayınca bir kaydı silmek üzeresiniz uyarısını ve sonrasını access hata kodu veriyor ama bunu bizim göstereceğimiz bir hata kodu nasıl gösterebiliriz.yardımlarınız için teşekkürler

'SİLME İŞLEMİ Nİ YAPAN SİL BUTONU OLAYYORDAM KODU AŞAĞIDA
'BU KODA GÖRE KENDİN BUTONUNUN OLAYYORDAM KODUNA İŞLEYEBİLİRSİN BENDEKİ ÖRNEKTE ÜSTFORM VE ALTFORM VERİLERİNİ AYNI ANDA SİLMEYİ BAŞLATAN SİLME SORGUSUNU ÇALIŞTIRAN BİR KOMUT.
Private Sub SİL_Click()
On Error GoTo Err_SİL_Click



If Me.NewRecord = True Then MsgBox "SİLİNECEK KAYIT YOK", 48, "S İ L": Exit Sub

If MsgBox("SİLMEK İSTEDİĞİNİZDEN EMİNMİSİNİZ?", 36, "S İ L") = 6 Then
For x = 1 To 1000 Step 5
'SİLME İŞLEMİNİ YAP KOPMLE
DoCmd.OpenQuery "GFSİL", acViewNormal, acAdd 'güncelle gerekli alanları
DoCmd.OpenQuery "GCHSİL", acViewNormal, acAdd 'güncelle gerekli alanları
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70


DoCmd.Close

Else
Me.Undo
DoCmd.Close
End If
Exit_SİL_Click:
Exit Sub
Err_SİL_Click:
MsgBox "SİLME İŞLEMİ YAPILAMADI", 0, "S İ L"
Resume Exit_SİL_Click

DoCmd.Close

End Sub

 

[ramazanyurt]

ya arkadaşlar şu kodların bir açıklamasını yapabilir misiniz? Mesala acMenuVer70 ne demek, 6,8 ne demek

 

[aksoyahmet1]

sağolun

teşekkür ederim