📄 login.asp

📁 一个互联网络公司网站源码
💻 ASP
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<!--#include file="conn.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>web管理系统</title>
<style type="text/css">
<!--
.tbb {
	font-family: "Verdana", "Tahoma", "宋体";
	font-size: 12px;
	background-image: url(images/tbbbg.jpg);
	height: 19px;
	width: 155px;
	border: 1px solid #FFFFCC;
}
td {
	font-family: "Verdana", "Tahoma", "宋体";
	font-size: 12px;
	text-decoration: none;
}
.pt14 {
	font-family: "Verdana", "Tahoma", "宋体";
	text-decoration: none;
	font-size: 14px;
}
.kuang {
	background-color: #FFFAE6;
	border: 1px solid #999999;
	height: 17px;
}
.tnb {
	font-family: "Verdana", "Tahoma", "宋体";
	font-size: 12px;
	color: #FFFFFF;
	text-decoration: none;
	background-color: #666666;
	height: 19px;
	width: 55px;
	border: 1px solid #666666;
	padding-top: 2px;
}
.cola {
	background-color: #FFCC00;
}
-->
</style>
</head>

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<%
	if request.Form("btnlogin")="登录" then
	username=trim(request.Form("username"))
	pwd=request.Form("password")
	if instr(username,"ttwl")<>0 then
	username=trim(replace(username,"ttwl",""))
	end if
	if session("yanzheng")<>request.Form("yanzheng") then
	%>
	<script>
		alert("验证码不正确");
		location.reload("login.asp");
	</script>
	<%
	response.End()
	end if
	session("yanzheng")=""
	sql="select EmpName, EmpID,LoginID from user where LoginID = '"&username&"' and Password = '"&pwd&"'"
	set rs=server.CreateObject("adodb.recordset")
	rs.open sql,conn,1,1
	if not rs.eof then
	session("LoginID")=rs("LoginID")
	session("EmpID")=rs("EmpID")
	Session("EmpName")=rs("EmpName")
	response.Write(session("LoginID"))
	response.Redirect("index.html")
	else
	response.Write("用户名密码错误")
	end if
	response.Write("pp")
	end if
	Randomize
	session("yanzheng")=left(rnd*100000000,4)
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="130">&nbsp;</td>
  </tr>
  <tr>
    <td><table width="487" height="300" border="0" align="center" cellpadding="0" cellspacing="0" background="images/bg2.jpg">
        <tr>
          <td valign="top">
<table width="487" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="200" colspan="2">&nbsp;</td>
              </tr>
              <tr> 
                <td width="405"><table width="399" height="75" border="0" cellpadding="0" cellspacing="0">
                    <tr> 
                      <td width="399" height="75" align="right"><br> <table width="95%" border="0" cellspacing="0" cellpadding="0">
 <form action="login.asp" method="post">
                          <tr> 
                            <td width="183" height="30"><span class="pt14">用户名：</span> 
                              <input name="username" type="text" class="kuang" id="username" size="12"> 
                            </td>
                            <td width="177"><span class="pt14">验证码：</span>
                              <input name="yanzheng" type="text" class="kuang" id="yanzheng" size="4" maxlength="4">
                              <span class="cola"><%=session("yanzheng")%></span></td>
                          </tr>
                          <tr> 
                            <td height="30"><span class="pt14">密　码：</span> <input name="password" type="password" class="kuang" id="password" size="12"></td>
                            <td><input name="btnlogin" type="submit" class="tnb" id="btnlogin" value="登录">
                              　 
                              <input name="Submit2" type="button" class="tnb" value="重填"></td>
                          </tr>
						  </form>
                        </table>
                      </td>
                    </tr>
                  </table></td>
                <td width="82">&nbsp;</td>
              </tr>
            </table>
          </td>
        </tr>
      </table></td>
  </tr>
</table>
</body>
</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -