acCmdDeleteRecord - Microsoft Access Forum


	Back to Access Forum Comments List

Upload Images @Reply Bookmark Link Email Next Unseen

acCmdDeleteRecord

Gordon Merkosky

2 years ago

I had an issue with this command. I had a Form open in the back ground that uses the on timer event. I would get the message "acCmdDeleteRecord is not available now". I got around it by setting the Time interval to 0 at the start of the code then setting it back at the end of the code. I am posting this because i spent many hours trying to figure it out. Here is the work around code i used.

Details
Private Sub DelBtn_Click()

    Forms!PatListF.TimerInterval = 0
    
    If MsgBox("Do you wish to Remove the Current" & vbNewLine & "Record from this form?", _
            vbYesNo, "Remove Confirmation") = vbYes Then
        Me.Requery
        Me.AllowDeletions = True
        Me.AllowEdits = True
        DoCmd.SetWarnings False
        DoCmd.RunCommand acCmdDeleteRecord
        DoCmd.SetWarnings True
        Me.AllowDeletions = False
    End If
    
    Forms!PatListF.TimerInterval = 750
    
End Sub

hope this helps others having the same problem.

Kevin Robertson @Reply

2 years ago

Here's how I handle deletions.

If MsgBox("Are you sure you want to DELETE this contact?" & vbNewLine & vbNewLine & _

    "This action CANNOT be undone.", vbYesNoCancel, "Confirm Delete") <> vbYes Then Exit Sub



CurrentDB.Execute "DELETE FROM ContactT WHERE ContactID=" & ContactID

I only add a delete button for non critical data. Always be extremely careful when deleting records and make sure you have good backups.

Don't Delete Data
Backup Access
Access Backup Template

Kevin Yip @Reply

2 years ago

CurrentDB.Execute doesn't tell you if the record was actually deleted, nor does it give you any error message.  So I often invoke the RecordsAffected property afterwards:

     Dim db As Database, n As Long
     Set db = CurrentDB
     db.Execute "DELETE ... "
     n = db.RecordsAffected

In the above, n will be the number of records deleted.  For this code to work, we must save the "instance" of CurrentDB in the manner shown above.

	Gordon Merkosky OP @Reply 2 years ago
I get what your saying. In my case i was only deleting the record from the form and not from the database.

This thread is now CLOSED. If you wish to comment, start a NEW discussion in Access Forum.

Next Unseen

New Feature: Comment Live View