Cmd Button does not prompt for delete records?

R

Randy

Access 2000. I have a cmd button on my form to delete the current record.
My db on a laptop with Windows 2000 does not prompt when the delete this
record button is clicked. The record is imediately deleted. The exact same
db on another computer with XP does prompt before deletion. I dont know why
this is. Any ideas? Heres my code. Thanks..Randy

Private Sub Delete_Field_Note_Click()
On Error GoTo Err_Delete_Field_Note_Click
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
Exit_Delete_Field_Note_Click:
Exit Sub
Err_Delete_Field_Note_Click:
MsgBox Err.Description
Resume Exit_Delete_Field_Note_Click
End Sub
 
R

RuralGuy

Access 2000. I have a cmd button on my form to delete the current record.
My db on a laptop with Windows 2000 does not prompt when the delete this
record button is clicked. The record is imediately deleted. The exact same
db on another computer with XP does prompt before deletion. I dont know why
this is. Any ideas? Heres my code. Thanks..Randy

Private Sub Delete_Field_Note_Click()
On Error GoTo Err_Delete_Field_Note_Click
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
Exit_Delete_Field_Note_Click:
Exit Sub
Err_Delete_Field_Note_Click:
MsgBox Err.Description
Resume Exit_Delete_Field_Note_Click
End Sub
Click to expand...

On your laptop under Tools>Options Edit/Find tab what boxes are
checked in the TopRight area called Confirm?

_______________________________________________
hth - RuralGuy (RG for short)
Please post to the NewsGroup so all may benefit.
 
R

RuralGuy

Do you issue: DoCmd.SetWarnings False anywhere in the code?
You might try going to the immediate window and typing:
DoCmd.SetWarnings True
Then see if you still have the same symptom.

Record Changes, Document deletions, and Action queries are all
checked....Randy
Click to expand...

_______________________________________________
hth - RuralGuy (RG for short)
Please post to the NewsGroup so all may benefit.
 
R

Randy

I had no set warnings to false, but when I went to the immediate window and
entered DoCmd.SetWarnings to false, it works now..Thanks for you help
 
Top