<%
set conn=server.createobject("ADODB.Connection")
set rs=server.createobject("ADODB.Recordset")
conn.open "filedsn=e:\user\user.dsn"
rs.open "select username from user",conn
strsql="insert into user(username,password,name_corp,product,add_corp,pc,tel_corp,fax_corp,mobile,email,ip) values ('"&username&"','"&password&"','"&name_corp&"','"&product&"','"&add_corp&"','"&pc&"','"&tel_corp&"','"&fax_corp&"','"&mobile&"','"&email&"','"&ip&"')"
checked=0
do while not rs.eof
if rs("username")=username then
checked=1
else rs.open strsql,conn
end if
rs.movenext
loop
if Checked =1 then
response.Write("username is exist ,change another one! ")
Response.End
end if
%>
这里也有一段程序，也是循环出错，不能控制，我想控制注册时候用户名和库里面的核对，如果同名则要更换。请问这个怎么弄啊。我已经学以致用了，用checked来控制，而不是直接输出。