修改数据库中时间格式字段错误
With dm.ADOq do
begin
Close;
SQL.Clear;
time:= strtodatetime(edit39.Text);
SQL.Add( 'update yuangong set shijian=to_date('''+FormatdateTime('yyyy-mm-dd ',time)+''', 'yyyy-mm-dd') Where xingming='''+edit15.Text+''' ');
execsql;
end;

系统总是提示错误 ， 请问该怎样修改数据库中的时间字段的值。

[解决办法]

Delphi(Pascal) code

SQL.Add('update yuangong set shijian='+Quotedstr(StrToDateTime(edit39.Text))+' where xingming='+Quotedstr(edit15.Text));
[解决办法]
哦，我写错了，直接像下面这样即可。
只要edit39输入的是符合日期的格式就行了,至于是不是符合日期格式自己要先判断
  
... shijian='+Quotedstr(edit39.Text)+' ...
[解决办法]
实验出真理,去试试吧,只要输入格式正确就行

Quotedstr是为了处理单引号问题，最终的语句像这样的
update yuangong set shijian='2012-8-23' where xingming='XX'