sql="select * from users where nick='"&yhm&"'" '连接数据库驱动
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,0,1
if rs.bof and rs.eof then
set rs=server.CreateObject("adodb.recordset") '打开表
sql="select * from users"
rs.open sql,conn,1,3 '表示可写入 rs.open sql,conn,1,1表示只读
rs.addnew
rs("nick")=yhm
rs("password")=mm
rs("dianhua")=dh
rs.update
rs.close
set rs=nothing
set conn=nothing
response.write"<center>恭喜注册成功,"&_
"按<a href=login.asp>这里</a>登陆</center>"
else
rs.close
set rs=nothing
set conn=nothing
response.write"<center>此用户名已被注册"&_
"按<a href=javascript:history.go(-1)>这里</a>返回,<a href=javascript:history.go(-1)>重新注册</a>"
response.end
end if