>Hi Eric,
>Following is the code :-
>
>
>Private lordo_app As rdoResultset
>
>Set lordo_app = goConnection.OpenResultset(" select * from app " & lswhereclause, rdOpenKeyset, rdConcurReadOnly)
>
>
>If (lordo_app!requiredar <> 0 And lordo_app!otc = 1) Then
>
> txtarstart = Format(lordo_app!Received, "MM/dd/yyyy")
> txtantarfinish = Format(lordo_app!Received, "MM/dd/yyyy")
> txtarfinish = Format(lordo_app!Received, "MM/dd/yyyy")
> txtarstart = Format(lordo_app!Received, "MM/dd/yyyy")
> txtarstatus = 100
> txtarbcstart = Format(lordo_app!Received, "MM/dd/yyyy")
> txtantarbcfinish = Format(lordo_app!Received, "MM/dd/yyyy")
> txtarbcfinish = Format(lordo_app!Received, "MM/dd/yyyy")
>
>end if
Is «lordo_app!Received» defined with a Date datatype? Don't you have any other code that can change this (ie: GotFocus or other)? If you answer no to both question, I have no ideas!!!
Éric Moreau, MCPD, Visual Developer - Visual Basic MVP
Conseiller Principal / Senior Consultant
Moer inc.
http://www.emoreau.com