我学ASP还是个新手，所以只能写这样简单的代码。为什么这段代码在注册成功之后不能更新数据库，也就是说同一个用户名可以千万次的重覆注册？
顺便问一句，怎么可以获取当前登陆的用户名。？

<%
on error resume next
a=trim(request.form("zhh"))
b=trim(request.form("mm"))
c=trim(request.form("xm"))
d=trim(request.form("xb"))
e=trim(request.form("ly"))
dim conn
dim connstr
on error resume next
connstr="DBQ="+server.mappath("db1.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
commandtext="select * from t_user where d_user='"&a&"'"
set rs=conn.execute(commandtext,,adcmdtext)
if rs.eof then
commandtext="Insert into t_user(d_user,d_pass,d_name,d_sex,d_liuyan) VALUES('"&a&"','"&b&"','"&c&"','"&d&"','"&e&"')"
conn.Execute commandtext,,adcmdtext
if errs.count=0 then
response.write"<P>注册成功!</p>"
response.write"<a href=top.htm>返回首页</a>"
end if
else
response.write"<P>该用户名已经被注册过了，请选择新的用户名!</P>"
response.write"<a href=zhc.asp>注册页面</a>"
end if
set conn=nothing
%>

dim conn,connstr
on error resume next
set conn=server.createobject("ADODB.CONNECTION")
connstr="DBQ="+server.mappath("db1.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
conn.open connstr

a=trim(request.form("zhh"))
b=trim(request.form("mm"))
c=trim(request.form("xm"))
d=trim(request.form("xb"))
e=trim(request.form("ly"))

set rs=conn.execute(commandtext,,adcmdtext)
sql="select * from t_user where d_user='"&a&"'"
rs.open sql,conn,1,3
if rs.recordcount>0 then
response.write"<P>该用户名已经被注册过了，请选择新的用户名!</P>"
response.write"<a href=zhc.asp>注册页面</a>"
end if
else
rs.addnew
rs("d_user")=a
rs("d_pass")=b
rs("d_name")=c
rs("d_sex")=d
rs("d_liuyan")=e
rs.update
response.write"<P>注册成功!</p>"
response.write"<a href=top.htm>返回首页</a>"
end if

总是提示说“该用户名已经被注册过了，请选择新的用户名！”
if rs.recordcount>0这句是什么意思。顺便提一句，多了一句end if

dim conn,connstr
on error resume next
set conn=server.createobject("ADODB.CONNECTION")
connstr="DBQ="+server.mappath("db1.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
conn.open connstr

a=trim(request.form("zhh"))
b=trim(request.form("mm"))
c=trim(request.form("xm"))
d=trim(request.form("xb"))
e=trim(request.form("ly"))

set rs=server.createobject("adodb.recordset")
sql="select * from t_user where d_user='"&a&"'"
rs.open sql,conn,1,3
if rs.recordcount>0 then 是说如果记录集中已经存在该用户，等同于:not rs.eof and rs.bof
response.write"<P>该用户名已经被注册过了，请选择新的用户名!</P>"
response.write"<a href=zhc.asp>注册页面</a>"
else
rs.addnew
rs("d_user")=a
rs("d_pass")=b
rs("d_name")=c
rs("d_sex")=d
rs("d_liuyan")=e
rs.update
response.write"<P>注册成功!</p>"
response.write"<a href=top.htm>返回首页</a>"
end if

谢谢。成功注册了。。

还是白雪写的好看点