<%
user=request.form("user")
pwd1=request.form("pwd1")
pwd2=request.form("pwd2")
webmaster=request.form("zhanzhang")
kind=request.form("kind")
web=request.form("web")
email=request.form("email")
wwwhttp=request.form("url")
intro=request.form("intro")
nowtime=now()
timestr=cstr(year(nowtime))+"年"+right("0"+cstr(month(nowtime)),2)+"月"+right("0"+cstr(day(nowtime)),2)+"日"

if user="" or pwd1="" or pwd2="" or webmaster="" or web="" or email="" or wwwhttp="" then
msg="内容不全，请填写所有内容！"
else
if pwd1<>pwd2 then
msg= "二次密码填写不对，请重填"
else
%>
<!--#include file="conn.asp"-->
<%
Set rs = Conn.Execute("select * from user where username = '" & user & "'")
if rs.eof or rs.bof then

sql="Insert into user(username,password,email,webmaster,web,wwwhttp,wwwintro,addtime,kind) values ('"&user&"','"&pwd1&"','"&email&"','"&webmaster&"','"&web&"','"&wwwhttp&"','"&intro&"','"&timestr&"','"&kind&"')"

conn.Execute(sql)
msg="成功加入"
conn.close

else
msg="用户已存在，请重新填写用户"
end if
end if
end if
%>
<html>
<head>

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>用户注册</title>

<link rel="stylesheet" type="text/css" href="style/5.css">
</head>

<body>
<table width="600" align="center" cellspacing="0" cellpadding="1"  border="0" bgcolor=#000000>
  <tr> 
    <td> 
      <table width="600" cellspacing="0" cellpadding="4" border="0" class="table002">
        <tr> 
          <td class="jnfont7" valign="middle" align=left> <b>>> </b> <a href="default.asp"><acronym title="返回主页">主页</acronym></a> 
            | <a href="modify.asp?user=<%=user%>"><acronym title="编辑你的个人资料">修改资料</acronym></a> 
            | <%if  adminok="ok" then%><a href="usermanager.asp?user=<%=user%>&exit=ok"><acronym title="退出管理">退出管理</acronym></a><%else%><a href="usermanager.asp?user=<%=user%>"><acronym title="回复或删除留言">留言管理</acronym></a><%end if%> 
            | <a href="default.asp"><acronym title="免费申请留言本">免费申请</acronym></a> 
            | <a href="top.asp"><acronym title="留言排行榜">留言排行</acronym></a> </td>
          <td class="jnfont7" valign="middle" align=right><b><%=webname%></b></td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<p>&nbsp;</p><table align="center"><td class="jnfont3" >
<p align="center">提示：<%=msg%><br><br>
『<a href="default.asp">返回</a>』</P></td>
</table>
<table border="0" width="560" cellpadding="0" align="center">
  <tr> 
    <td width="100%"> 
      <hr size="1" width="80%">
    </td>
  </tr>
  <tr> 
    <td width="100%" class="jnfont6"> 
          <p align="center">
            <a href=http://www.5151.cn target=_blank>免费留言本由[中泰科技]提供</a>
        </td>
      </tr>
    </table>     
<p align="center">&nbsp;</P>
</body>
</html>
