registration.asp

网上有名留言板20120版,非常不错~

<%sub registration()%>
<%tablefirst()%>
        <table width=100% border=1 cellspacing=0 cellpadding=2 bordercolorlight=#333333 bordercolordark=#FFFFFF align="center">
  <form name=submitok method=POST action=index.asp?action=adduser&user=<%=admin%>>
             <tr> 
            <td  align=center valign="top"> <font  class=link  > <br>
              </font> 
              
        <table width=100% border=0 cellspacing=0 cellpadding=6>
          <tr> 
            <td colspan="2" class=link  align="center">申 请 留 言 板 （演示期间暂停申请）</td>
          </tr>
          <tr> 
            <td width=30% class=link  align="right">您的帐号：</td>
            <td width=70%> 
              <input type=text name=user1 size=20 maxlength=50 class=link>
            </td>
          </tr>
          <tr> 
            <td width=30% class=link  align="right">您的密码：</td>
            <td width=70%> 
              <input type=password name=password size=20 maxlength=50 class=link>
            </td>
          </tr>
          <tr> 
            <td width=30% class=link  align="right">确认密码：</td>
            <td width=70%> 
              <input type=password name=confirm size=20 maxlength=50 class=link>
            </td>
          </tr>
          <tr> 
            <td width=30% class=link  align="right">您的姓名：</td>
            <td width=70%> 
              <input type=text name=name size=20 maxlength=50 class=link>
            </td>
          </tr>
          <tr> 
            <td width=30% class=link  align="right">网站简称：</td>
            <td width=70%> 
              <input type=text name=myhome size=20 maxlength=5 class=link>
            </td>
          </tr>
          <tr>
            <td width=30% class=link  align="right">留言风格：</td>
            <td width=70%> 
              <select name="styleid" class=link>
                <%
    sql_style="select styleid,name from style"
   set rs_style=conn.execute(sql_style)
   while not rs_style.eof
   response.write "<option value="&rs_style("styleid")&">"&rs_style("name")&"</option>"
   rs_style.movenext
   wend
   rs_style.close
  %>
              </select>
            </td>
          </tr>
          <tr> 
            <td width=30% class=link  align="right">网站全称：</td>
            <td width=70%> 
              <input type=text name=homename size=50 maxlength=100 class=link>
            </td>
          </tr>
          <tr> 
            <td width=30% class=link  align="right">您的网址：</td>
            <td width=70%> 
              <input type=text name=homepage size=20 maxlength=50 class=link value="http://">
            </td>
          </tr>
          <tr> 
            <td width=30% class=link  align="right">电子邮箱：</td>
            <td width=70%> 
              <input type=text name=email size=20 maxlength=50 class=link>
            </td>
          </tr>
          <tr> 
            <td width=30% class=link  align="right">网站简介：<br>
              <%if ubb=1 then%>
              支持UBB，<br>
              <a href=javascript:openScript('?user=<%=request("user")%>&action=help_ubb',580,400)>UBB帮助</a>！ 
              <%end if%>
              <br>
            </td>
            <td width="70%"> 
              <textarea rows=8 name=profile cols=45 class=link wrap="PHYSICAL"></textarea>
            </td>
          </tr>
        </table>
              <p> 
                
          <input type=submit value=提交申请 class=link name="submit1">
          <script>
document.submitok.submit1.disabled=1;
</script>    </p>
              <p>&nbsp; </p>
              </td>
          </tr>
  </form>
        </table>
     <%tablelast()%>
<%end sub%>