Skip to main content

AccessTr.neT

Kayıt Ol

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

Form Silme Butonu

Sümeyye_
Sümeyye_
Access Cevaplanmış Soruları
9
609

Form Silme Butonu

Çözüldü #1
Sümeyye_
Aktif Üye
Sümeyye_
Bul
Aktif Üye
Adı Soyadı:
Yaşı: 23
Konum:
Ofis Versiyonu:
Son Oturumu: 06/09/2023,19:11
Yorumları: 31
Konuları: 11
Kayıt Tarihi: 07/12/2022
Teşekkür Puanı: 0
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ı: 3)
Cevapla
#2
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: Dün,21:04
Yorumları: 13.543
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur 
 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
Sümeyye_
Aktif Üye
Sümeyye_
Bul
Aktif Üye
Adı Soyadı:
Yaşı: 23
Konum:
Ofis Versiyonu:
Son Oturumu: 06/09/2023,19:11
Yorumları: 31
Konuları: 11
Kayıt Tarihi: 07/12/2022
Teşekkür Puanı: 0
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
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: Dün,21:04
Yorumları: 13.543
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur 
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
Sümeyye_
Aktif Üye
Sümeyye_
Bul
Aktif Üye
Adı Soyadı:
Yaşı: 23
Konum:
Ofis Versiyonu:
Son Oturumu: 06/09/2023,19:11
Yorumları: 31
Konuları: 11
Kayıt Tarihi: 07/12/2022
Teşekkür Puanı: 0
Yine olmadı
Cevapla
#6
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: Dün,21:04
Yorumları: 13.543
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
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