用ADO连接access日期字段插入出现的问题。(10分)

s2的内容是这样的：20021022
adotable1.FieldByName('tzrq').Value:=copy(s2,1,4)+'-'+copy(s2,5,2)+'-'+copy(s2,7,2);
adotable1.FieldByName('tzrq').asstring:=strtodate(copy(s2,1,4)+'-'+copy(s2,5,2)+'-'+copy(s2,7,2));
上面的两种方法都不行；
各位帮帮忙；

adotable1.FieldByName('tzrq').asdatetime:=strtodate(copy(s2,1,4)+'-'+copy(s2,5,2)+'-'+copy(s2,7,2));

在字串前后各加一個'#'

adotable1.FieldByName('tzrq').Value:='#'+copy(s2,1,4)+'-'+copy(s2,5,2)+'-'+copy(s2,7,2)+'#';

多人接受答案了。

(1)用给参数赋值的方式如

query1.sql.add('select * from tablename where regdate>:lastdate');
query1.parambyname('lastdate').asdatetime:=strtodate('2001-01-01');
query1.open;
(2)只适用于ACCESS
sql:='SELECT ＊ FROM tablename WHERE time_in>=#'+formatdatetime('yyyy/mm/dd',sdt - 1)+'# '
+' AND time_out<=#'+formatdatetime('yyyy/mm/dd',edt + 1)+'# ';

(3)
在sql语句中给日期型赋值
用引号把转换成字符串的时间引起来。如
fieldname:='''+formatdatetime()+'''';