,VB将当前时间导入ACCESS

求助,VB将当前时间导入ACCESS
tim=CStr(Now)
conn.execute("update xs set ts="&tim&" where id="&id&"")
ts项是widestring类型,所以我想把当前时间转换类型后导入数据库,可是总是失败,也用过formatdatetime(now(),2),居然能成功导入,只是表项值变成了莫名其妙的1993

------解决方案--------------------
conn.execute("update xs set ts='"&tim&"' where id="&id&"")