BeforeDelConfirm stopped working

[robin27th]

Hi,
I had this perfectly working form "Patients" where I had a custom delete confirmation in BeforeDelConfirm event. But suddenly I found out that the delete confirmation is not working. I have no clue what went wrong. I put a Debug.Print in the BeforeDelConfirm sub to see if it fires at all. As I guessed it is not fired and delete command continues without confirmation.

I created a new form "Patients1" using access wizard where the delete confirmation works fine.

I am using Access 2010 and accdb format. I have attached the my database. Please help me to resolve this issue.

Thanks,
Robin

[robin27th]

I figured out that I have converted the ID field from integer to text (PT0001,PT0002,..) which caused the problem. But do not find any apparent reason how it may cause the problem.

I tested with entering numeric Id in the table and delete confirmation works. Please help.

[NeoPa]

You'll need to post some more information Robin. There are no details about any relevant design issues. Posting an attachment is not to be relied on. The question needs to be fully explained in the text.

PS. Even those who do open attachments largely require them to be in 2003 or earlier format. Even a readable attachment though, cannot be considered as fitting in place of a properly worded question. Only as further clarification at best, or to give an opportunity for seeing the problem for themselves. Never as part of the question. Never an excuse for missing out important detail in the question.

PPS. It's just the sort of thing that will cause a thread to remain unanswered. A clearly described question is very much more likely to garner responses.

[patjones]

I'm going to go along with NeoPa here and ask you to post the code. I've looked at attachments for other threads, however that has been in cases where all else failed. There could be something simple in your code that we can just pick out immediately. Thanks.

Pat

[robin27th]

Thank you NeoPa and Pat.

Firstly, let me tell you this is my first project in Access. I wrote the following Delete_Click sub to delete records in form Patients. I wanted a custom delete confirmation, so I added the BeforeDelConfirm event. Until this point everything working in order when I decided to change the Id field from numeric to text (PT0001, PT0002,..) and made the changes in the code accordingly. But I found records are deleted without the confirmation msg. Incidentally I discovered that if I use a numeric value as Id instead of text, it shows the confirmation msg. I am totally clueless about this behavior as there is no reference to Id field in any of these functions.

Private Sub Delete_Click()
    On Error GoTo ErrorHandler:
    Screen.PreviousControl.SetFocus
 
    If Not Me.NewRecord Then
        RunCommand acCmdDeleteRecord
    End If
 
    If Me.NewRecord And Not Me.Dirty Then
        RunCommand acCmdRecordsGoToLast
    End If
 
    If Me.NewRecord And Me.Dirty Then
        RunCommand acCmdUndo
        RunCommand acCmdRecordsGoToLast
    End If
    Exit Sub
 
ErrorHandler:
    If Err.Number = 2501 Then 'Catches the error raised by cancelling DoCmd action
        Err.Clear
    Else
        MsgBox "Error # " & Err.Number & vbCrLf & _
                vbCrLf & Err.Description
        Beep
    End If
End Sub

Private Sub Form_BeforeDelConfirm(Cancel As Integer, Response As Integer)
    Dim strMessage As String
    Dim intResponse As Integer
    On Error GoTo ErrorHandler:
    strMessage = "Are you sure, you want to delete the current record?"
    intResponse = MsgBox(strMessage, vbYesNo + vbQuestion, "Continue delete?")
 
    If intResponse = vbYes Then
        Response = acDataErrContinue
    Else
        Cancel = True
    End If
    Exit Sub
 
ErrorHandler:
    MsgBox "Error # " & Err.Number & vbCrLf & _
            vbCrLf & Err.Description
 
End Sub

I hope I could clarify the question.

Thanks,
Robin

[patjones]

I set your situation up in my test database and found the same thing...that the before delete event is not firing. No time to research further right now but I certainly am going to look into it.

Pat

[patjones]

Robin,

I apologize for the delay. I'm not sure if you managed to resolve this issue. I discovered that the BeforeDelConfirm event will not fire if the the Confirm Record Changes box is cleared under Access Options. When I set that option and tried it again, the event fired properly.

Give it a try and let us know. If it doesn't work, we can look into it further.

Pat

[robin27th]

Hi Pat,
Thanks for ur reply. The bizarre thing which I had also mentioned earlier is that if I use a numeric value as Id instead of text, it shows the confirmation msg. If "Confirm Record Changes" is unchecked it shouldn't fire at all. Anyway I have checked in the settings and found alright.

Robin