SQL-SERVER的删除数据问题

我是用asp+sql server做信息系统的。
在使用下面一段代码做数据删除时，
sql1="select * from user where age="& age
set rs1=server.createobject("adodb.recordset")
rs1.open sql1,conn,3,2

do while not rs1.eof
rs1.delete
rs1.update
rs1.movenext
loop

，老是显示“Microsoft OLE DB Provider for ODBC Drivers (0x80040E23)
行句柄引用了一个已被删除的行或被标识为删除的行。”
请教大家，有没有解决办法。