<!--#include file="cn.asp"-->
<!--#include file="func.asp"-->
<%

set rs=server.CreateObject("adodb.recordset")
sql="select * from users where uname='"&trim(request.Form("uname"))&"'"
rs.open sql,cn,1,3
if  not rs.eof then
response.Write "<script language=javascript>alert('被注冊的用戶名！');history.go(-1);</script>"
response.End()
rs.close
set rs=nothing
cn.close
set cn=nothing
end if
rs.addnew
rs("uname")=trim(request.Form("uname"))
rs("mm")=md5(trim(request.Form("mm")))
rs("tname")=trim(request.Form("tname"))
rs("sex")=trim(request.Form("sex"))
rs("age")=trim(request.Form("age"))
rs("question")=trim(request.Form("question"))
rs("answer")=trim(request.Form("answer"))
rs("card")=trim(request.Form("card"))
rs("qq")=trim(request.Form("qq"))
rs("msn")=trim(request.Form("msn"))
rs("email")=trim(request.Form("email"))
rs("tel")=trim(request.Form("tel"))
rs("fax")=trim(request.Form("fax"))
rs("address")=trim(request.Form("address"))
rs("post")=trim(request.Form("post"))
rs("inf")=trim(request.Form("inf"))
rs.update
response.Write "<script language=javascript>alert('注冊成功！');window.location.replace('../login.asp');</script>"
response.End()
rs.close
set rs=nothing
cn.close
set cn=nothing
%>