Reset One Value On Save Cmd Button 1

[smdemo]

I hope I can be clear with what I am looking for. I have a database that has a status field with values such as Open, Pending, Closed. When a case is set to closed it is archived. I need some validation to happen at that point to make sure one or more fields are completed (the record is not completed all at once so I can't just set the field to required). What I need to happen is if they set the status to close and click the button to save the record I want the field to revert back to the previous status (open or pending), but save the rest of the information in the record. I have pasted what I have but obviously need to adjust the Me.TaskStatus.Value = "O" line and am not sure how to call back the previous value.

Thanks
Steve


If strDC = "Not Valid" Then
strDateComp = "Date completed is not valid."
MsgBox "Please note that this call is not complete because:" & Chr(13) & Chr(13) & strDateComp, vbInformation
If Me.TaskStatus.Value = "C" Then
Me.TaskStatus.Value = "O"
End If
End If

 

[PHV]

What about this ?
Me.TaskStatus.Value = Me.TaskStatus.OldValue

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[smdemo]

Works perfectly. I can't believe I scrolled right by that when looking at the properties list.

Thanks
Steve