query1.close;
query1.sql.clear;
Query1.SQL.Add('Select * from mail Where Muser="'+curuser+'" and ExDate='+DateToStr(now));
if (Not Query1.Prepared) then Query1.Prepare;
query1.Open;///ExDate是Date类型
报错说mismatch
query1.sql.clear;
Query1.SQL.Add('Select * from mail Where Muser="'+curuser+'" and ExDate='+DateToStr(now));
if (Not Query1.Prepared) then Query1.Prepare;
query1.Open;///ExDate是Date类型
报错说mismatch
就是
Query1.SQL.Add('Select * from mail Where Muser="'+curuser+'" and ExDate='''+DateToStr(now)+'''');
query1.close;
query1.sql.clear;
Query1.SQL.Add('Select * from mail Where Muser='''+curuser+''' and ExDate=:dd');
Query1.ParamByName('dd').AsDate := now;
if (Not Query1.Prepared) then Query1.Prepare;
query1.Open;