
arkadaşlar ben tablomdaki belli kritere göre olan verileri tek seferde silmek istiyorum. yardımlarınız için şimdiden teşekkürler...
(10/12/2014, 14:22)aydın3838 yazdı: selam
CurrentDb.Execute "DELETE tablo.alan FROM tablo WHERE tablo.alan =" & kriter & ""
Dim ONAY As String
DoCmd.SetWarnings True
ONAY = MsgBox("MEZUN ÖĞRENCİLERİNİ SİLMEK İSTEDİĞİNİZDEN EMİN MİSİNİZ?", vbYesNo, "XXX")
If ONAY = 6 Then
DoCmd.RunCommand acCmdSaveRecord
DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE FROM Tablo1 WHERE SINIFI>12"
DoCmd.SetWarnings True
'DoCmd.RunSQL "delete from TABLO1 WHERE SINIFI >'{12}'"
MsgBox "MEZUN ÖĞRENCİLERİ SİLME İŞLEMİ TAMAMLANDI", vbOKOnly, "XXX"
Else
MsgBox "İŞLEM İPTAL EDİLDİ", vbOKOnly, "XXX"
End If
Alıntı:KOMUT DÜĞMESİNE BASINCA TBLO1 DEKİ SINIFI SADECE 12 DEN BÜYÜK OLAN OĞRENCİLERİ SİLMESİNİ İSTİYORUM