Stop Record Deletion

  • Thread starter Thread starter Justin
  • Start date Start date
J

Justin

I have a continous form based on a table. The form uses the record selector
function to allow users to easily delete un-wanted data. Some records will
now be uploaded into a differnt system. I have set-up a field to flag which
records have been uploaded. How can I keep the record selector, but stop
rows that have been uploaded (flagged) from being deleted?
 
Justin said:
I have a continous form based on a table. The form uses the record
selector
function to allow users to easily delete un-wanted data. Some records
will
now be uploaded into a differnt system. I have set-up a field to flag
which
records have been uploaded. How can I keep the record selector, but stop
rows that have been uploaded (flagged) from being deleted?
Click to expand...


You could use the form's Delete event, like this:

'----- start of code -----
Private Sub Form_Delete(Cancel As Integer)

If Me.RecordUploaded = True Then
Cancel = True
MsgBox "Can't delete record " & Me.ID & _
" -- this record has been uploaded."
End If

End Sub
'----- end of code -----
 
Justin said:
I have a continous form based on a table. The form uses the record
selector
function to allow users to easily delete un-wanted data. Some records
will
now be uploaded into a differnt system. I have set-up a field to flag
which
records have been uploaded. How can I keep the record selector, but stop
rows that have been uploaded (flagged) from being deleted?
Click to expand...

Use the form's Delete event procedure to cancel the deletion if flagged:

Cancel = (Me.FlagField = True)
 
Back
Top