newuser.asp

gdflsdf fkspofql owjlfkjsoijdf sdjfo

<!--#include file="sub/conn.asp"-->
<!--#include file="sub/md5.asp"-->
<!--#include file="sub/inc.asp"-->
	  <%
	  username = Trim (HTMLEncode(Request.form("username")))
	  pass = Trim(HTMLEncode(Request.form("userpwd")))
	  qq = trim(HTMLEncode(request.form("qq")))
	  email = trim(HTMLEncode(request.form("usereamil")))
	  sex = trim(HTMLEncode(request.form("radio")))
          phone = trim(HTMLEncode(request.form("phone")))
          sheng = trim(HTMLEncode(request.form("sheng")))
if QQ="" then
QQ="0"
end if
if phone="" then
phone="0"
end if          
	  '怕别人用自己写的网页表单不填用户名和内容
	  if userName ="" or pass="" then
	     Response.Redirect("reg.asp")
          else 

set rs=server.createobject("adodb.recordset")
sql="select * from ax_user where name='"&username&"'"
rs.open sql,cn,3,3
if not (rs.eof and rs.eof) then
Response.Write "<script language=javascript>{window.alert('此名称已被人注册过,请返回修改名称注册!');window.location.href='javascript:history.go(-1)';}</script>"
else
pass=md5(pass)
rs.addnew
rs("name")=username
rs("pwd")=pass
rs("sex")=sex
rs("email")=email
rs("userqq")=qq
rs("phone")=phone
rs("sheng")=sheng
rs("regtime")=date()
'默认级别
rs("type")="普通会员"
rs("dpic")="images/nodown.gif"
rs.update
Response.Write "<script language=javascript>{window.alert('谢谢您的注册,您现在是本站联盟会员了！请登录!<br/>请牢记您的帐号:"&rs("name")&"');window.location.href='user.asp';}</script>"
rs.close
set rs=nothing
cn.close
set cn=nothing
end if
end if
%>