10/12/2014, 14:17
birkaç veriyi aynı anda silme
1 2
10/12/2014, 14:22
aydın3838
selam
CurrentDb.Execute "DELETE tablo.alan FROM tablo WHERE tablo.alan =" & kriter & ""
CurrentDb.Execute "DELETE tablo.alan FROM tablo WHERE tablo.alan =" & kriter & ""
10/12/2014, 14:23
C*e*l*o*y*c*e
10/12/2014, 14:30
te-kin
10/12/2014, 14:34
atoz112
sayın te-kin,
bahsini yaptığınız soruna yönelik olarak aşağıdaki kodlamayı formun üzerindeki butonun içeriği ile değiştirdiğiniz takdirde sorununuza çözüm bulmuş olacaksınızdır.bilgilerinize.
bu arada,sayın aydın3838 ve sayın celoyce;
konu sahibi sayın te-kin form üzerindeki talep beyanlarına göre
değerlendirmek gerektiğinden,eklediğiniz kodlamalarda sadece küçük bir düzeltme yapmak yerinde olacaktır,nacizane sizlerin hoşgörülerinize sığınaraktan;=12 yerine >12 olarak kodlamada düzeltme yapmak gerekir.
iyi çalışmalar,
saygılar.
bahsini yaptığınız soruna yönelik olarak aşağıdaki kodlamayı formun üzerindeki butonun içeriği ile değiştirdiğiniz takdirde sorununuza çözüm bulmuş olacaksınızdır.bilgilerinize.
Kod:
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
bu arada,sayın aydın3838 ve sayın celoyce;
konu sahibi sayın te-kin form üzerindeki talep beyanlarına göre
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
değerlendirmek gerektiğinden,eklediğiniz kodlamalarda sadece küçük bir düzeltme yapmak yerinde olacaktır,nacizane sizlerin hoşgörülerinize sığınaraktan;=12 yerine >12 olarak kodlamada düzeltme yapmak gerekir.
iyi çalışmalar,
saygılar.
10/12/2014, 14:36
te-kin
1 2