用Delphi在Access中插入时间。

Question

adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('insert into mtb values("'+edit1.Text+'",#'+Datetostr(now)+'#)');
adoquery1.ExecSQL;
//这样可以插入日期；但我要插入的是时间，如12:23:00。而不是2003-1-1。adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('insert into mtb values("'+edit1.Text+'",#'+Timetostr(now)+'#)');
adoquery1.ExecSQL;
//这样不行.
//请赐教.

Answer 1

adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('insert into mtb values('''+edit1.Text+''','''+DateTimeToStr(Time)+''')');
adoquery1.Prepared;
adoquery1.ExecSQL;