VB 数据库操作出错 syntax error or access violation

以前的程序，执行SQL语句和存储过程没有问题。
一次停电后，把一个文件破坏掉。恢复这个文件后
部分数据库操作有关的地方出错。错误提示：syntax error or access violationsql = "exec venmonthsum '2007-07-01','2007-07-31','0','1000000','RMB'"
RS.Open sql, CustomDB.cnnCust, adOpenKeyset, adLockBatchOptimistic
就不能执行
以上语句在SQL中完全可以执行
请遇见过这中情况的朋友指点。