🚀 go-pugleaf

For command that does not return records, use TADOCommand:

 ADOCommand1->ParamCheck = false;
 ADOCommand1->CommandText = "DELETE FROM test WHERE Col2 < #08/26/04
10:17:30#";
 ADOCommand1->Execute();

ParamCheck should be false because there is ':' in command text. For Jet
(Access) you may also need to write DELETE * FROM ... (not '*' char).

Use parameter will set date using TDateTime and does not depend on string
format:

 ADOCommand1->ParamCheck = true;
 ADOCommand1->CommandText = "DELETE FROM test WHERE Col2 < :param";
 ADOCommand1->Parameters->Items[0]->Value = EncodeDate(2004, 8, 26);
 ADOCommand1->Execute();

//------------------------------------------
Regards,
Vassiliev V. V.
http://www.managed-vcl.com - using .Net objects in Delphi for Win32 +
ADO.Net
http://www.oledbdirect.com - The fastest way to access MS SQL Server,
MS Jet (Access) and Interbase (through OLEDB)

"Kim Utley" <kim@simsware.com> �������/�������� � �������� ���������:
news:41055c66$1@newsgroups.borland.com...
> Oops,
>
> Meant to say:
>
> > I wish to use a SQL statement because if I use TADOTable it wants to
read
> up
> > all ROWS when I open the table.
>
>
> "Kim Utley" <kim@simsware.com> wrote in message
> news:41055bb8$1@newsgroups.borland.com...
> > Am using Microsoft Access with TADOQuery and TADOConnection.
> >
> > What do you mean by 'use parameter'?
> >
> > I wish to to SQL statement because if I use TADOTable it wants to read
up
> > all columns when I open the table.
> >
> >     adoQuery->SQL->Clear();
> >     adoQuery->SQL->Add( "DELETE FROM EventHistoryTbl WHERE
> >             DateTimeStamp < '06/26/04 10:17:30'" );
> >
> >     //    this is where the exception is thrown...
> >     //
> >     adoQuery->ExecSQL();
> >
> >
> > Kindest Regards,
> >
> >
> > Kim
> >
> > "Viatcheslav V. Vassiliev" <support@oledbdirect.com> wrote in message
> > news:41053e2f$1@newsgroups.borland.com...
> > > It depends on DBMS. General solution that should work with any DBMS is
> to
> > > use parameter for dates.
> > >
> > > //------------------------------------------
> > > Regards,
> > > Vassiliev V. V.
> > > http://www.managed-vcl.com - using .Net objects in Delphi for Win32 +
> > > ADO.Net
> > > http://www.oledbdirect.com - The fastest way to access MS SQL Server,
> > > MS Jet (Access) and Interbase (through OLEDB)
> > >
> > > "Kim Utley" <kim@simsware.com> �������/�������� � �������� ���������:
> > > news:41052c3f$1@newsgroups.borland.com...
> > > > Hi All,
> > > >
> > > > Am working on BCB 6 with TADO... objects, specifically
TADOConnection
> > and
> > > > TADOQuery in my example problem. I am attempting to delete all rows
in
> a
> > > > table that have a date/time stamp older than 'x' amount of days.
> > > >
> > > > I am issuing the following SQL statement be am getting "Data type
> > mismatch
> > > > in criteria express' exception:
> > > >
> > > > DELETE FROM EventHistoryTbl WHERE DateTimeStamp < '06/26/04
10:17:30'
> > > >
> > > > I've also tried:
> > > >
> > > > DELETE FROM EventHistoryTbl WHERE DateTimeStamp < #06/26/04
10:17:30#
> > > >
> > > > Does anyone know why I'm getting this error?
> > > >
> > > > Kindest Regards,
> > > >
> > > >
> > > > Kim L. Utley
> > > >
> > > >
> > >
> > >
> >
> >
>
>