Question

vb6执行update有问题

vb6下执行Db1.Execute "update DMZ set 发证日期=dateadd("yyyy",-1,年检日期)"这句话提示缺少结束语句，请问怎么解决？数据库是ACCESS的

Answer 1

晕哦！其实出现“缺少结束语句”的原因很简单啦。就是双引号的问题。。
你的这句：Db1.Execute "update DMZ set 发证日期=dateadd("yyyy",-1,年检日期)"
会被看做是：Db1.Execute "update DMZ set 发证日期=dateadd("
它后面再接：yyyy",-1,年检日期)" 当然会出现错误！
改成下面这样即可：
Db1.Execute "update DMZ set 发证日期=dateadd(""yyyy"",-1,年检日期)"

Answer 2

Db1.Execute "update DMZ set 发证日期=dateadd(" & chr(34) & "yyyy" & chr(34) & ",-1,年检日期)"
注意& 前后有空格

Answer 3

Db1.Execute "update DMZ set 发证日期=" & dateadd("yyyy",-1,年检日期)