如何通过ADOCommand的Parameter输入Datetime字段

Question

如果按下面这样一段程序，如何将当前时间放入到SQL的DateTime字段中ADOCommand1->CommandText = "Insert Into Test (Name,Birthday) values (:Name,:Value)
ADOCommand1->ParamCheck();
ADOCommand1->Parameters->ParamByName("Name")->Value = Edit1->Text;
ADOCommand1->Parameters->ParamByName("Birthday") ---????

Answer 1

ADOCommand1->Parameters->ParamByName("Birthday") ->Value = DateTimeToStr(Now());

Answer 2

ADOCommand1->Parameters->ParamByName("Birthday")->value='2003-2-2';
也是可以的！

Answer 3

ADOCommand1->Parameters->ParamByName("Birthday")->value="'2003-2-2'";

Answer 4

感谢各位，不过上述方法我已经先行试过了。这应该与数据库系统有关，当然如能采用其它方法，如采用ADOQuery也可以，那位能提供点源代码？下面是我试上位两位老兄的代码，没能通过。//    strCommText = "Insert Into " + strTableName + "(sysid, RecordDatetime,";
    strCommText = "Insert Into " + strTableName + "(sysid,";
    if(bAllField)
        strCommText = strCommText + strInsertField;//    strCommText = strCommText + ") valus(:sysID, :RecordDatetime, ";
    strCommText = strCommText + ") values(:sysID,";
    if(bAllField)
        strCommText = strCommText + strInsertValue;
    strCommText = strCommText + ")";    InsertCommand->CommandText = strCommText;
    InsertCommand->ParamCheck;    InsertCommand->Parameters->ParamByName("sysID")->Value = count;
//    InsertCommand->Parameters->ParamByName("RecordDatetime")->Value = "2003/5/14 16:22:22";//DateTimeToStr(Now());
......
程序注释掉的语句如执行要参生错误，报告不正常的参数定义
两种方法都一样

Answer 5

用Sql 语名把日期作为字符串进行赋值。
例：
insert into lk(dateD) values('2002-02-03')

Answer 6

= "2003/5/14 16:22:22";//
这个是完全错误的
Delphi中字符串不能用双引号引起来。
'2002-02-03'

Answer 7

不好意思，
//        strCommText  =  strCommText  +    ")  valus(:sysID,  :RecordDatetime,    ";  
       strCommText  =  strCommText  +    ")  values(:sysID,  ";  
values 写成了valus
还是要感谢大家