Skip to main content

AccessTr.neT


Form Silme Butonu

Form Silme Butonu

Çözüldü #1
Merhaba,
Silme butonunda msgbox ekledim silmek istediğinize emin misiniz? yazdım. Hayır'a  tıklayınca yine de siliyor. 
Kayıt formda silinse bile tabloda o satır silinmek yerine içi boş bir şekilde duruyor.
.rar Celosoft_kullanıcı.rar (Dosya Boyutu: 35,34 KB | İndirme Sayısı: 1)
Cevapla
#2
 If MsgBox(Me.cboMachineName & " nolu silinecek..! Eminmisiniz?", vbOKCancel + vbQuestion, "Araç Takip") = vbYes Then

    Me.txtBiosSerialNumber = ""
    Me.txtCores = ""
    Me.txtOsName = ""
    Me.txtTotalPhysicalMemory = ""
    Me.cboCurrentUsers = ""
    Me.txtMachineName = ""
    Me.txtCurrentUsers = ""

Else

    Exit Sub

End If
Cevapla
#3
Yaptım ama çalışmadı
.rar örnek.rar (Dosya Boyutu: 35,68 KB | İndirme Sayısı: 2)
Son Düzenleme: 29/12/2022, 14:49, Düzenleyen: Sümeyye_.
Cevapla
#4
If MsgBox(Me.cboMachineName & " nolu silinecek..! Eminmisiniz?", vbOKCancel + vbQuestion, "Araç Takip") = vbYes Then
    
     DoCmd.RunCommand acCmdDeleteRecord

Else
    Exit Sub
End If

Ben mevzuyu yanlış anladım. Üstteki kodu deneyiniz.
Cevapla
#5
Yine olmadı
Cevapla
#6
mesaj kutusu komutunun vbokcancel olduğunu fark ettim, doğru kod aşağıdadır.


If MsgBox(Me.cboMachineName & " nolu silinecek..! Eminmisiniz?", vbYesNo + vbQuestion, "Araç Takip") = vbYes Then

    DoCmd.SetWarnings False
    DoCmd.RunCommand acCmdSelectRecord
    DoCmd.RunCommand acCmdDeleteRecord
    DoCmd.SetWarnings True

Else

    Exit Sub

End If
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task