set rs as new recordset '在MSDN中对ado有详细的论述
...
rs.movelast '只有当id=10是最后一条记录时才可这样用否则你恐怕要用到一个循环
rs.edit
rs!id=9
rs.updata 'ok
...
rs.movelast '只有当id=10是最后一条记录时才可这样用否则你恐怕要用到一个循环
rs.edit
rs!id=9
rs.updata 'ok
调试欢乐多
---
ADO无EDIT,但只要对VALUE附值就可以了
set rs as new recordset '在MSDN中对ado有详细的论述
...
rs.movelast '只有当id=10是最后一条记录时才可这样用否则你恐怕要用到一个循环
rs.edit
rs!id=9
rs.updata 'ok 你的方法是行不通的
如果用户确实要有一个序号字段,就另加一个,用程序来实现自动递增。
if delete() then
movefirst
do while not eof()
index=record.cursor
movenext
loop
endif
当然可以再优化一下,算法就不写了,伪代码自己转换一下吧。