<form id="form1" name="form1" method="post" action="123.asp?ss=sfqx">
  <input type="submit" name="Submit" value="提交" />
</form>
<!--#include file="Conn1.asp" -->
<%
If Request.QueryString("ss")="sfqx" Then
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from JaAdmin where Userweb='公司注册'",conn1,1,3
if not rs1.eof then
do while not rs1.eof
rs1("qyclass")=3
rs1.movenext
loop
Response.Write "<script language=javascript>alert('修改成功!');window.document.location.href='123.asp';</script>"
else
end if
rs1.update
rs1.close
set rs1=nothing
end if
%>
能实现所有‘公司注册'的qyclass值得为3 但是~不能返回到123.asp

ddddddddddd

呵呵 自己写的一个程序修改数据库因为现在不管是个人还是公司的值都是0 我想把 公司的qyclass这个值改成3，一个一个去改麻烦

提示

BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
/cqsq123/123.asp, 第 14 行

<!--#include file="Conn1.asp" -->
<form id="form1" name="form1" method="post" action="123.asp?ss=sfqx">
  <input type="submit" name="Submit" value="提交" />
</form>
<%
If Request.QueryString("ss")="sfqx" Then
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from JaAdmin where Userweb='公司注册'",conn1,1,3
if not rs1.eof then
do while not rs1.eof
rs1("qyclass")=3
rs1.movenext
loop
rs1.update
rs1.close
set rs1=nothing
Response.Write "<script language=javascript>alert('修改成功!');window.document.location.href='123.asp';</script>"
end if
else
end if
%>

rs1.update是现在的14行

天涯你这样只能修改一个

还是不行还是rs1.update这里出错

谢谢leaphs