access 插入时间

想在Access中插入时间
首先是将文本格式的数字拼装组合成日期格式
然后insert
但是下面的语句总是出错，请个位高手帮忙啊
<%
addyear=2007
addmonth=5
addday=1
DateStr=FormatDateTime(addyear&"-"&addmonth&"-"&addday")
exec="INSERT INTO pcdata(medate) VALUES (#DateStr#)"
set rs=server.createobject("adodb.recordset")
conn.execute exec
%>

已经测试下面代码是成功的，上面的转换有什么问题么？
<%
exec="INSERT INTO pcdata(medate) VALUES (#2007-5-1#)"
set rs=server.createobject("adodb.recordset")
conn.execute exec
%>
Error Type:
Microsoft VBScript compilation (0x800A0409)
Unterminated string constant
/webtest/testexeadd.asp, line 10, column 56

line10报错，应该是转换错误，大家再看看

exec="INSERT INTO pcdata(medate) VALUES (#"&DateStr&"#)" 已经测试，错误

access 插入时间 把时间插入到access数据库中 ado如何向access数据库中插入时间 ASP插入ACCESS数据 access 插入记录 VB插入access记录 ASP问题：请问如何将服务器时间插入到access库的字段中 插入数据库access中的表示 WORD中插入ACCESS数据 access+asp数据库无法插入