--- In firebird-support@yahoogroups.com, "Adam" <s3057043@y...> wrote:

>
> --- In firebird-support@yahoogroups.com, "dilish_tv" <dilish_tv@y...>
> wrote:
> >
> >
> > Thanks For the Quick Reply
> >
> > Error Message is :
> >
> > Arguments are of Wrong Type or out of Acceptable range or Are Conflict
> > with One Another.
> >
> > ---------------------
> > Here is the Code:-
> >
> > AdoQry.Parameters.ParamByName('Prm0').DataType:= ftTimeStamp;
> > AdoQry.Parameters.ParamByName('Prm0').Value :=
> > VarToDateTime(RSt.Fields['S_DATE'].Value);
> > ---------------------
> > RSt.Fields['S_DATE'] is a DateTime Field in MSAccess
>
> Where does the exception get raised? If it is when you are assigning
> the parameters, it is a Delphi exception, you could try something like.
>
> AdoQry.Parameters.ParamByName('Prm0').AsDateTime :=
> RSt.FieldByName('S_DATE').AsDateTime;
>
> Of course if the field contained any NULLs, then those records would
> be given a date (1899 or 1758 or something like that) when you call
> .AsDateTime.
>
> so you could do something like
>
> if RSt.FieldByName('S_DATE').IsNull then
> AdoQry.Parameters.ParamByName('Prm0').Clear
> else AdoQry.Parameters.ParamByName('Prm0').AsDateTime :=
> RSt.FieldByName('S_DATE').AsDateTime;
>
> And see if that helps.
>
> Delphi implements timestamps/datetimes as a floating point number, so
> it is impossible to get the MySQLish scenario of 30 Feb or some other
> impossible date, I am not sure is Access also happily stores illegal
> dates.
>
> Adam
>

=================================================================
Hi Adam,

Thanks for ur Advice

As am using Ado There is no Property like 'AsDateTime'-
Its working fine When I Changed the TIMESTAMP To DATE DataType

But TIMESTAMP Have Still Problems

Dilish