如何在SQL字符串中用UPDATE更新日期型字段值?

Question

如何在SQL字符串中用UPDATE更新日期型字段值？  
以下不能执行：  
str1:=edit1.text;  
form1.Query1.Close;  
form1.Query1.SQL.Clear;  
form1.Query1.SQL.Add('update  Record  set  Export_date1=strtodate(str1)');  
form1.Query1.ExecSQL;  

Answer 1

update  Record  set  Export_date1='str1'
日期当作符串一样处理 
另外Strtodate 是Delphi中函数，不是SQL中的函数。

Answer 2

str1:=edit1.text;  
form1.Query1.Close;  
form1.Query1.SQL.Clear;  
form1.Query1.SQL.Add('update  Record  set  Export_date1=QuotedStr(str1)');  
form1.Query1.ExecSQL;

Answer 3

不好意思，刚才错了。
str1:=edit1.text;  
form1.Query1.Close;  
form1.Query1.SQL.Clear;  
form1.Query1.SQL.Add('update  Record  set  Export_date1=' + QuotedStr(str1));  
form1.Query1.ExecSQL;