最好:
dim time1 as String
time1 = format(date,"yyyy-mm-dd")
sqlstr = "insert into 表(日期) " & "values('" & time1 & "')"
dim time1 as String
time1 = format(date,"yyyy-mm-dd")
sqlstr = "insert into 表(日期) " & "values('" & time1 & "')"
datenow = date
sqlstr = "select * from 表 where 表.日期 < " + "'" + datenow + "'"
有错误,请问如何改