为什么不能删除数据库中的记录？

[humdark]

代码：
With moveRs
.Open "select * from " & tablemove & "", conser, adOpenDynamic, adLockOptimistic
.AddNew
!empid = strempid
!datetime = datetime
!machineno = lvcon.ListItems(i).SubItems(2)
.Update
.Close
.Open "select * from " & table & " where empid = " & strempid & " and DateTime = datetime and machineno = " & strmachineno & "", conser, adOpenDynamic, adLockOptimistic
.Delete
.UpdateBatch adAffectAllChapters
End With
moveRs.Close

在一个数据库中添加成功，但却不能在另一个数据库中删除记录，什么原因？

[txlicenhe]

权限问题？