Skip to main content

AccessTr.neT


Form1 De Buton İle Form2 Den Kayıt Sil

Form1 De Buton İle Form2 Den Kayıt Sil

#7
özür diliyorum çalıştı hocam hatanın ne olduğunu siz anladınız  Ozur
Cevapla
#8
Kodun tamamını aşağıdaki ile değiştirerek dene,

Dim GVeriVarmi As Integer

GVeriVarmi = Nz(DCount("[kimlik]", "Tablo2", "[adı]&"" ""&[soyadı]='" & Me.Liste53.Column(1) & " " & Me.Liste53.Column(2) & "'"), 0)

If GVeriVarmi > 0 Then

If MsgBox(Me.Liste53.Column(1) & " " & Me.Liste53.Column(2) & " isimli şahsın bilgileri silinsin mi?", vbYesNo) = vbYes Then

DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE [adı] & '-' & [soyadı] AS silinecekveri FROM Tablo2 WHERE ((([adı] & ' ' & [soyadı])='" & Me.Liste53.Column(1) & " " & Me.Liste53.Column(2) & "'));"
DoCmd.SetWarnings True

Else

MsgBox ("Silme İşlemi İptal Edildi")

End If

Else

MsgBox (Me.Liste53.Column(1) & " " & Me.Liste53.Column(2) & " isimli şahıs bulunamadı")

End If
Cevapla
#9
Ayrıca lütfen Profil Bilgilerinizi güncelleyiniz.
Cevapla
#10
tek kelime süper teşekkür ederim hocam
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da