reg.asp

还是同学录 功能较为的简单点 挺好用的

<!--#include file="conn.asp"-->
<title><%=sitename%></title>
<form method="POST" action="savereg.asp">
  <table width="<%=width%>" border="0" align="center" cellpadding="0" cellspacing="0">
    <tr>
      <td width="35%" align="center" height="25">帐&nbsp;&nbsp;&nbsp; 号</td> 
      <td width="50%" align="center" height="16">
        <input type="text" name="user" size="20">
      </td>
    </tr>
    <tr>
      <td width="35%" height="25" align="center">
        密&nbsp;&nbsp;&nbsp; 码 
      </td>
      <td width="50%" height="33" align="center">
        <input type="password" name="password" size="20">
      </td>
    </tr>
    <tr>
      <td width="35%" align="center" height="25">重输密码</td>
      <td width="50%" align="center" height="16">
        <input type="password" name="password1" size="20"></td>
    </tr>
    <tr>
      <td width="35%" height="25" align="center">
        性&nbsp;&nbsp;&nbsp; 别 
      </td>
      <td width="50%" height="33" align="center">
      <select size="1" name="sex">
          <option selected value="男">男</option>
          <option value="女">女</option>
          &nbsp; 
        </select>
      </td>
    </tr>
    <tr>
      <td width="35%" align="center" height="25">生&nbsp;&nbsp;&nbsp; 日</td> 
      <td width="50%" align="center" height="16">
          <select size="1" name="birthday_y">
<%
  dim i
  for i=1927 to 2004
      response.write"<option value='"&i&"'>"&i&"</option>"
  next
%>
          </select>年
          <select size="1" name="birthday_m">
<%
  for i=1 to 12
      response.write"<option value='"&i&"'>"&i&"</option>"
  next
%>
          </select>月
          <select size="1" name="birthday_d">
<%
  for i=1 to 31
      response.write"<option value='"&i&"'>"&i&"</option>"
  next
%>
          </select>日
      </td>
    </tr>
    <tr>
      <td width="35%" height="25" align="center">
        邮&nbsp;&nbsp;&nbsp; 箱 
      </td>
      <td width="50%" height="33" align="center">
      <input type="text" name="email" size="20">
      </td>
    </tr>
    <tr>
      <td width="100%" align="center" height="25" colspan="2"><input type="submit" value="注 册" name="B1">&nbsp;&nbsp;&nbsp; 
        <input type="reset" value="重 写" name="B2">&nbsp;&nbsp;&nbsp; <input type="button" value="登 陆" name="B2" onclick=location.href="login.asp"></td> 
    </tr>
  </table>
</form>
<%
  conn.close
  set conn=nothing
%>