各位高手您好：最近我编程了一个软件，该程序在XP下可以运行，但是在98下不行……

具体情况是：
首先用一查询语句 检查 今天是否已经有该记录
dim rs as adodb.recordset 
dim rs = new adodb.recordset
rs.open main where 质量=质量+ '"& rsmain &"'  where 日期=#'" & date &"'#_ and 名称='"& 汽油 &"'",adocnn
if rs.eof =true then
addnew
……
rs.updata
else
"updata main set 质量=质量+ '"& rsmain &"'  where 日期=#'" & date &"'#_ and 名称='"& 汽油 &"'",adocnn,optis……，state……
 更新“质量”字段。
   
  出错说明：
该程序在XP下，工作正常；但在98下rs.eof 始终为true，每次都添加一新记录，并不累加“质量”字段。
我已经在98上安装 mdac_type.exe
  相逢即为朋友，请各位朋友帮帮忙！！