| Facebook ile Bağlan | Twitter İle Bağlan | Google+ İle Bağlan

İki Birleşik formu silme

HAKKI34

Access Cevaplanmış Soruları

4381

02/11/2009, 16:26 #2

accesstr.net , gayet net ;)

ayhan2122

Bul

Onursal Üye

Adı Soyadı:

Yaşı: 47

Konum: -

Ofis Versiyonu: Ofis 2003

Son Oturumu: 10/02/2021,19:44

Yorumları: 681

Konuları: 26

Kayıt Tarihi: 30/10/2008

Teşekkür Puanı: 451

Komut8'in olay yordamına ;

Kod:

Private Sub Komut8_Click()

On Error GoTo Err_Komut25_Click



If MsgBox("Ekrandaki tüm bilgiler silinecek", vbYesNo, "Onaylıyor musunuz ?") = vbYes Then

    DoCmd.RunCommand acCmdSelectRecord

    DoCmd.RunCommand acCmdDeleteRecord

    DoCmd.RunSQL "DELETE Tablo2.Kimlik, Tablo2.[No] FROM Tablo2 WHERE (((Tablo2.[No])=[Forms]![Veri]![No]));"

Else

End If



Exit_Komut25_Click:

    Exit Sub



Err_Komut25_Click:

    MsgBox Err.Description

    Resume Exit_Komut25_Click

End Sub

Saygılar, iyi çalışmalar.
*********
Kod, formül vs bilmek önemlidir ama mantığını yürütebilmek, nerede ve nasıl kullanılacağını bilmek daha önemlidir.

Cevapla