On the Edit page verify that the start date is earlier than the end date.
Note: Change the values listed in red to match your specific needs.
Function BeforeEdit(values,where,oldvalues,keys,message,inline) if CDate(values("start_date"))>CDate(values("end_date")) then Response.Write "Error" BeforeEdit = False else BeforeEdit = True end if End Function