sql="select * from 表名"
rs.open sql,conn,1,3
do while not rs.eof
if Clng(rs("E_DepTime"))<>4 then
rs("depnumber")=0
rs.Update
end if
rs.movenext
loop
rs.close
sql="update [表名] set [depnumber]=0 where [E_DepTime]<>4"
conn.execute(sql)
sql="select * from 表名"
rs.open sql,conn,1,3
do while not rs.eof '若不是最后一条
if Clng(rs("E_DepTime"))<>4 then '进行条件判断
rs("depnumber")=0 ‘设置为0
rs.Update ’更新数据库
end if
rs.movenext
loop
rs.close
二楼 scheshan 是最效率的语句