index.asp

一个用ASP编写的 关于火车售票的系统 写得还很详细的值得借鉴阿

<!-- #include file="inc/top.asp" -->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<%
            dim num1
            dim rndnum
            Randomize
            Do While Len(rndnum)<4
            num1=CStr(Chr((57-48)*rnd+48))
            rndnum=rndnum&num1
            loop
            session("code")=rndnum
%>

<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="3"><div align="center"></div></td>
  </tr>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" class="unnamed_rld2">
  <tr>
  <td width="50%" height=24></td>
  <td width="50%"></td>
</tr>
<tr>
          <td colspan="2"><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
              <td>
                <form action="admpost.asp" method="post" id="form2">
                  <table width="250" border="0" align="center" cellpadding="0" cellspacing="0" class="unnamed1_rld">
                    <tr bgcolor="#EAEAEA">
                      <td height="25" colspan="2">
                        <div align="center">
                          <%
            if mm=1     then 
               Response.Write "对不起，您输入的密码有误！"
            elseif mm=2 then
               Response.Write "您没有登陆的权限！"
            elseif mm=3 then
               Response.Write "请输入完整的用户名和密码！"
            end if
%>
                管理员登陆 </div></td>
                    </tr>
                    <tr>
                      <td width="100" height="30"><div align="center">管理员帐号：</div></td>
                      <td width="154">
                        <input name="keys" type="hidden" value="submit">
                        <input name="username" type="text" class="unnamed_rld2" id="username2" value="admin" size="20" maxlength="20"></td>
                    </tr>
                    <tr>
                      <td height="30"><div align="center">管理员密码：</div></td>
                      <td>
                        <input name="password" type="password" class="unnamed_rld2" size="20" value="" maxlength="20">
                      </td>
                    </tr>

                    <tr align="center">
                      <td height="30" colspan="2">
                        <input type="submit" name="Reg2" value="登录" class="bottom">
                        <input type="reset" name="Submit32" value="重填" class="bottom">
                        <input type=button value="问题反馈" onclick="window.location='liuyan.asp'">
                      </td>
                    </tr>
                  </table>
              </form></td>
            </tr>
          </table></td>
  </tr>
</table>
      <table width="752" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="3"><div align="center"></div></td>
        </tr>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="30" bgcolor="#A0A4AC"><div align="center" class="unnamed3write"><br>
        <a href="http://www.25175.com">Powered by 25175 </a>苦雨斋版</div></td>

  </tr>
</table>
</body>
</html>