AccessTr.neT
Form1 De Buton İle Form2 Den Kayıt Sil - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Form1 De Buton İle Form2 Den Kayıt Sil (/konu-form1-de-buton-ile-form2-den-kayit-sil.html)

Sayfalar: 1 2


Cvp: Form1 De Buton İle Form2 Den Kayıt Sil - zaferlacin - 18/01/2019

özür diliyorum çalıştı hocam hatanın ne olduğunu siz anladınız  Ozur


Cvp: Form1 De Buton İle Form2 Den Kayıt Sil - ozanakkaya - 18/01/2019

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



Cvp: Form1 De Buton İle Form2 Den Kayıt Sil - ozanakkaya - 18/01/2019

Ayrıca lütfen Profil Bilgilerinizi güncelleyiniz.


Cvp: Form1 De Buton İle Form2 Den Kayıt Sil - zaferlacin - 18/01/2019

tek kelime süper teşekkür ederim hocam