select * from 库存 where 产品ID='" & me.产品ID & "'"if Not rs.BOF and Not rs.EOF thenCurrentDB.execute " update 库存 set 库存量=rs("库存量")+me.入库数量 where 产品ID='" & me.产品ID & "'"end if
