login.asp

来自「计算器源码」· ASP 代码 · 共 32 行

<% if session.contents("admin")="ok" then
response.redirect "loginok.asp" 
response.end
else 
session("user")=false %>
<!--#include file="conn.asp"-->
<!--#include file="top.asp"-->
<br>
<br>
<div align="center">

      <font size="2" ><strong>用 户 登 陆</strong></font>

</div>
<br>
<br>
<form name="form" method="post" action="chklogin.asp">
  <div align="center"><font size="2">请输入用户名: 
          <input type="text" name="username" size="8">
          <br><br>
          请输入密　码: 
          <input type="password" name="password" size="8">
          <br><br>
          <input type="submit" name="Submit" value="提交">
          <input type="reset" name="Submit2" value="重置">
          </font></div>
</form>
<br><br><br><br>
<!--#include file="bottom.asp"-->
<% conn.close
set conn=nothing %>
<%end if%>