AccessTr.neT
#silindi hatası - 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ığı: #silindi hatası (/konu-silindi-hatasi--15472.html)



#silindi hatası - yücelkaya - 05/11/2012

Değerli arkadaşlar,
ekteki dosyada bulunan resimde kaydı sil butonuna tıkladığımda "#silindi" şeklinde bir ibare çıkıyor.
silme işlemi ile ilgili kullandığım kodlar
"""Private Sub Komut99_Click()
On Error GoTo Err_Komut99_Click
Dim C As Integer
C = MsgBox("Kayıt silinecek..! Eminmisiniz?", vbOKCancel + vbQuestion, "CeloSoft")
If C = vbOK Then
DoCmd.SetWarnings False
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
DoCmd.SetWarnings True
ElseIf C = vbCancel Then
Me.Undo


End If

Exit_Komut99_Click:
Me.Requery
Exit Sub

Err_Komut99_Click:
MsgBox Err.Description
Resume Exit_Komut99_Click
End Sub"""
şeklindedir.hatam nerede bulamadım...


Cvp: #silindi hatası - accessman - 05/11/2012

temel bilgiler formuna bunu ekleyin
ben denedim silindi yazısı çıkmıyor

Kod:
Private Sub Açılan_Kutu18_Enter()
Açılan_Kutu18.Requery
End Sub




Cvp: #silindi hatası - yücelkaya - 05/11/2012

teşekkür ederim sayın accessman
sorun çözülmüştür.
saygılarımla+rep