神啊! 救救我吧!~
代码不知道那错了,就是写不进数据库。求救~~~~~~~~~~~~~~~~~~~~~~~~~~不过我输入什么,它都提示用户名、昵称、真实姓名已被别人注册。
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from user where username='"&trim(request("username"))&"'"
rs.open sql,secondconn,3,3
if rs.eof then
errmsg=errmsg+"<br><li>用户名"+trim(request("username"))+"已被别人注册"
founderr=true
end if
rs.close
set rs=nothing
set rs1=server.CreateObject("adodb.recordset")
sql1="select*from user where nickname='"&trim(request("nickname"))&"'"
rs1.open sql1,secondconn,3,3
if not rs1.eof then
errmsg=errmsg+"<br><li>昵称"+trim(request("nickname"))+"已被别人注册"
founderr=true
end if
rs1.close
set rs1=nothing
set rs2=server.CreateObject("adodb.recordset")
sql2="select*from user where truename='"&trim(request("truename"))&"'"
rs2.open sql2,secondconn,3,3
if not rs2.eof then
errmsg=errmsg+"<br><li>真实姓名"+trim(request("truename"))+"已被别人注册"
founderr=true
end if
rs2.close
set rs2=nothing
if trim(request("birthyear"))="" then
birthyear=" "
else
birthyear=trim(request("birthyear"))
end if
if trim(request("birthmonth"))="" then
birthmonth=" "
else
birthmonth=trim(request("birthmonth"))
end if
if trim(request("birthday"))="" then
birthday=" "
else
birthday=trim(request("birthday"))
end if
if trim(request("mobile"))="" then
mobile=" "
else
mobile=trim(request("mobile"))
end if
if trim(request("homeaddress"))="" then
homeaddress=" "
else
homeaddress=trim(request("homeaddress"))
end if
if trim(request("homepostcode"))="" then
homepostcode=" "
else
homepostcode=trim(request("homepostcode"))
end if
if trim(request("hometel"))="" then
hometel=" "
else
hometel=trim(request("hometel"))
end if
if trim(request("companyaddress"))="" then
companyaddress=" "
else
companyadress=trim(request("companyadress"))
end if
if trim(request("companypostcode"))="" then
companypostcode=" "
else
companypostcode=trim(request("companypostcode"))
end if
if trim(request("companytel"))="" then
companytel=" "
else
companytel=trim(request("companytel"))
end if
if trim(request("qq"))="" then
qq=" "
else
qq=trim(request("qq"))
end if
if trim(request("homepage"))="" then
homepage=" "
else
homepage=trim(request("homepage"))
end if
if trim(request("selfintro"))="" then
selfintro="我非常懒,不想介绍啦!"
else
selfintro=trim(request("selfintro"))
end if
if trim(request("memo"))="" then
memo=" "
else
memo=trim(request("memo"))
end if
if founderr=true then
response.write errmsg
else
set rs1=server.CreateObject("adodb.recordset")
sql1="select*from user where(userid is null)"
rs1.open sql1,secondconn,3,3
rs1.addnew
rs1("username")=trim(request("username"))
rs1("password")=trim(request("password"))
rs1("nickname")=trim(request("nickname"))
rs1("truename")=trim(request("truename"))
rs1("email")=trim(request("email"))
rs1("birthyear")=birthyear
rs1("birthmonth")=birthmonth
rs1("birthday")=birthday
rs1("mobile")=mobile
rs1("homeaddress")=homeaddress
rs1("homepostcode")=homepostcode
rs1("hometel")=hometel
rs1("companyaddress")=companyaddress
rs1("companypostcode")=companypostcode
rs1("companytel")=companytel
rs1("qq")=qq
rs1("homepage")=homepage
rs1("selfintro")=selfintro
rs1("memo")=memo
rs1("sex")=request("sex")
rs1("regtime")=now()
rs1("updatetime")=now()
rs1("logincount")=0
rs1("quanxian")="guest"
rs1("checked")=false
rs1.update
rs1.close
set rs1=nothing
response.Write "恭喜恭喜,注册成功!"
end if
%>