[SOLVED]DATEPART fails- New to Lazarus

[What I can do]

OS:Windows 10@64
Lazarus:3.22
DB with *.mdb  Access@32 bit
Project: Make a new temp Field upon query call
"aYMDate"

but all attempts failed,

Code: Pascal  [Select][+][-]

1.  SQLQuery1.Close;
2.  SQLQuery1.SQL.Text:='SELECT *, DATEPART('yyyy',ck_Date) as aYMDate From mytable';
3.  SQLQuery1.ExecSQL;
4.  SQLQuery1.Open;
5.  

[tooldeveloper]

Try the following instead:

Code: Pascal  [Select][+][-]

1. SQLQuery1.Close;
2.   SQLQuery1.SQL.Text:='SELECT *, DATEPART(''yyyy'',ck_Date) as aYMDate From mytable';
3.   SQLQuery1.Open;

The 'yyyy' needs two single quotes at beginning and end. The ExecSQL method is only for executing a statement that doesn't return a result.

[What I can do]

Thank you tooldeveloper
but...

Code: Pascal  [Select][+][-]

1.  SQLQuery1.SQL.Text:='SELECT *, DATEPART(''yyyy'',ck_Date) as aYMDate From mytable';

Tried two apostrophe and even tried quota but errored out both times

[paweld]

In MS Access, use quotation marks instead of an apostrophe as a string delimiter

Code: Pascal  [Select][+][-]

1. SQLQuery1.SQL.Text:='SELECT *, DATEPART("yyyy",ck_Date) as aYMDate From mytable';

https://www.w3schools.com/Sql/func_msaccess_datepart.asp

[What I can do]

Thank you, paweld
My problem was bad data.
I needed some working examples so I use ChatGPT to write some and it worked great.