楼上的兄弟们都还没说到点上吧，至于为什么用循环，那是因为给每条记录更新的gbook是不一样的．是由另外一段程序得到的．我刚刚找到方法了，以下是a.asp修改结果：
<!--#include file="conn.asp"-->
<%
dim gbook
gbook=request.form("textSTR")
set rs=server.CreateObject("ADODB.recordset")
sql="select id from r_user"
rs.open sql,conn,1,2 '使用悲观锁定
while not rs.eof
rs("gbook")=gbook
rs("gbook_num")=rs("gbook_num")+1
rs.update
rs.movenext
wend
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
这样就不会出现“正被另一用户锁定”的错误了。
谢谢大家关心我的贴子。