Duplicate Record Error Message!!

[forumer]

Can anyone please help me as to how to make a user-friendly message when a duplicate record entered into database?

I couldn't customize the database duplicate error message and also tried to do it within the form but no success so far!

I would be extremly grateful for any help



Thank you.

[Missinglinq]

What Field(s) constitute a 'duplicate' Record? What are Datatypes of the Field(s)?

Linq ;0)>

[forumer]

Hi MissingLinq,

Thank you for your reply. I want to change the databse msg when duplicates being entered into stNo in RegisterStudent form. How can I change the msg to a meaningful one or how can I antisipate for this error in the form? You can downlload the database from this link http://www.filefactory.com/file/1pvl...n/RegSys.accdb


Thanks

[June7]

Personally, I would do validation on the input and prevent the error.

Why would a duplication occur? What is your business process that allows this?

[forumer]

Hi June,

Thanks for the reply. I want to stop the user from entering a duplicate student no in RegisterStudent form. How can I do that? What type of event should I choose and should it be at control level or at form level?

I wrote this but the trouble is that it clears all the form instead of just the stNo control! and when I used me.stNo.undo , the system message of duplicated shows instead of mine which means it tries to save the record while I want to stop the save action all together!

Private Sub stNo_AfterUpdate()
If DCount("[stNo]", "student", "[stNo] = '" & Me.stNo & "'") > 0 Then
MsgBox "The student No has been entered into the dtabase before. No duplicates allowed!", , "Error Message"
Me.Undo
Me.stNo.SetFocus
End If
End Sub

[June7]

stNo is control?
Try BeforeUpdate event of stNo.

[Missinglinq]

As June said, the stNo_BeforeUpdate would be the place for this code; this keeps the keeps the duplicate from being committed and keeps focus on the Control, something that can't be done from the AfterUpdate event by simply using Me.stNo.SetFocus.

Linq ;0)>