Skip to main content

AccessTr.neT


Veri Silerken Şifre Sorma

Veri Silerken Şifre Sorma

#1
Arkadaşlar merhaba kod ile veri silerken şifre sorması için ne eklemem lazım? Yardımcı olursanız sevinirim.


Private Sub Komut27_Click()
On Error GoTo Err_Komut27_Click
Dim c As Integer
c = MsgBox("Seçilen satış silinecek..! Eminmisiniz?", vbOKCancel + vbQuestion, "Bilgi")
If c = vbOK Then
   DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
   DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
 Me.Liste22.Requery
ElseIf c = vbCancel Then
Me.Undo
End If

Exit_Komut27_Click:
   Exit Sub

Err_Komut27_Click:
   MsgBox Err.Description
   Resume Exit_Komut27_Click
   
End Sub
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Veri Silerken Şifre Sorma - Yazar: serkan1985 - 26/05/2017, 19:24
Cvp: Veri Silerken Şifre Sorma - Yazar: ozanakkaya - 26/05/2017, 19:32
Cvp: Veri Silerken Şifre Sorma - Yazar: serkan1985 - 26/05/2017, 19:38
Cvp: Veri Silerken Şifre Sorma - Yazar: ozanakkaya - 27/05/2017, 00:25
Cvp: Veri Silerken Şifre Sorma - Yazar: serkan1985 - 27/05/2017, 01:44
Task