ACCESS里面的一个SQL语句,转化成DELPHI里面的解决方法

ACCESS里面的一个SQL语句,转化成DELPHI里面的
SELECT a.id, iif(((b.id) Is Null),date(),DateAdd('yyyy',3,Format(b.日期5,"yyyy-mm-dd"))) AS 新日期,b.日期
FROM a LEFT JOIN b ON a.id=b.id
ORDER BY a.id;


就上面的在ACCESS里面的,如何转化成DELPHI里面查询SQL语句

[解决办法]
ADOQuery1.SQL.Add('SELECT a.id, iif(((b.id) Is Null),date(),DateAdd(''yyyy'',3,Format(b.日期5,''yyyy-mm-dd''))) AS 新日期,b.日期
FROM a LEFT JOIN b ON a.id=b.id
ORDER BY a.id');


[解决办法]

Delphi(Pascal) code

with adoquery1 dobegin  Close;  SQL.Text:='SELECT a.id, iif(((b.id) Is Null),date(),DateAdd(''yyyy'',3,Format(b.日期5,"yyyy-mm-dd"))) AS 新日期,b.日期'           +' FROM a LEFT JOIN b ON a.id=b.id'           +' ORDER BY a.id';  Open;end;或者:with adoquery1 dobegin  close;  SQL.Clear;  SQL.Add('SELECT a.id, iif(((b.id) Is Null),date(),DateAdd(''yyyy'',3,Format(b.日期5,"yyyy-mm-dd"))) AS 新日期,b.日期');  SQL.Add('FROM a LEFT JOIN b ON a.id=b.id');  SQL.Add('ORDER BY a.id');  Open;end;