数据库记录更新问题

最近小弟用ＶＢ连接ＡＣＣＥＳＳ　２００３　做一个系统，需要对数据库记录进行更新时出现错误：＂缺少更新或刷新的键列信息＂，不知道什么意思，如何解决？请各位帮助一下．
代码如下： lenCode = rsArrangeMode.Fields("中间包装长度代码")
 lenNum = rsArrangeMode.Fields("中间包装需求量")
 sqlPack = "select 抽屉编号,是否已排放 from 包装类别,器材包装详细结果,中间包装排放结果 where 包装类别.包装模式=器材包装详细结果.包装模式 and 器材包装详细结果.中间包装编号=中间包装排放结果.中间包装编号 and 包装宽度代码 = 1 and 包装长度代码=" & lenCode
　rsPack.Open sqlPack, cn, adOpenKeyset, adLockOptimistic
  For i = 1 To lenNum
      rsPack.Fields("抽屉编号").Value = DRAW_INDEX
      rsPack.Fields("是否已排放").Value = True
      rsPack.Update
      rsPack.MoveNext
  Next i
每次执行 rsPack.Update时就会报错．