Thanks, Bijithbabu...this works. --L
>try puttng the following code in the valid event of the control
>
>DO CASE
>
>CASE (CTOD(THIS.VALUE) > DATE())
>MESSAGEBOX("Error in Date: Greater than current date.",16)
>return 0
>
>
>CASE(CTOD(THIS.VALUE) < DATE()-60)
>MESSAGEBOX("Error in Date: More than 60 days before today.")
>return 0
>
>ENDCASE
-- Larry Keyes
Remember only You can prevent Gray Goo. Never release nanobot assembers without replication limiting code.