关于ROUND函数的问题

Question

drs1.Open "UPDATE hwck_sb SET RMB_AMT=ROUND(RMB_AMT,2)", conn, adOpenKeyset, adLockOptimistic
程序报错说表达式中ROUND函数没有定义
,我应该什么办或什么写.谢谢

Answer 1

是用VB调用ACCESS数据库的
如果不能解决以上问题可否调用ACCESS的一个过程.这个过程就写上这句
UPDATE hwck_sb SET RMB_AMT=ROUND(RMB_AMT,2)可以的话应该怎么做.谢谢

Answer 2

应该是access数据库不支持round函数吧？

Answer 3

access数据库是支持round函数的

Answer 4

drs1.Open "Select * from hwck_sb", conn, adOpenKeyset, adLockOptimistic
if not drs1.eof then
   conn.execute("UPDATE hwck_sb SET RMB_AMT=" & ROUND(drs1!RMB_AMT,2) & " where 主键='" drs1!主键 & "'")
end if