值50分的简单问题
xinjs 2003-04-09 01:35:15 我是新手。
有这么一个问题,请教高手!
有两个mdb的表,分别为temp和temp1,需要首先将temp内容清空,然后将temp1内的记录导入temp中,该操作需要多次重复执行(表中的记录不变)。以下代码执行有时成功,有时出错。错误信息是说不能更新,某某机器上的用户“admin”锁定了表。但是,机器是在单机运行,可以肯定没有其它用户打开了表。
adotemp.Requery
If adotemp.RecordCount > 0 Then
adotemp.MoveFirst
Do Until adotemp.EOF
adotemp.Delete
adotemp.MoveNext
Loop
End If
adotemp1.Requery
If adotemp1.RecordCount > 0 Then
adotemp1.MoveFirst
Do Until adotemp1.EOF
adotemp.AddNew
For i = 1 To 20
adotemp(i) = adotemp1(i)
Next i
adotemp.Update
adotemp1.MoveNext
Loop
End If