⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 login.asp

📁 这个是一个非常不错的asp源码
💻 ASP
字号:
<%@ Language = "VBScript" CodePage = "936" %>
<!--#Include File = "connadmin.asp"-->
<!--#Include File = "Md5.asp"-->
<%
If Request.TotalBytes > 0 Then
	UserName = Request.Form("UserName")
	PassWord = Request.Form("PassWord")
	GetCode = Request.Form("GetCode")

	If Cstr( GetCode ) = Cstr( Session("GetCode") ) Then
		Sql = "Select * From Admin Where UserName = '"& UserName &"'"
		Rs.Open Sql,Conn,1,3
			If Not ( Rs.Bof And Rs.Eof ) Then
				If rs("password") = Md5( PassWord,32 ) Then
					Session("Admin") = Rs("UserName")
					Session("AdminLastLoginTime") = Rs("LastLoginTime")
					Rs("LastLoginTime") = Now()
					Rs.Update
					Response.Redirect "Index.asp"
				End If
			End If
		Rs.Close
	End If
End If
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="Keywords" content="">
<meta name="Description" content="">
<title></title>
<link href="Image/Style.css" rel=stylesheet type=text/css>
</head>

<body background="Image/BackGround.jpg" text="#FFFFFF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" onload="form1.UserName.focus()">
<table width="100%" height="100%"  border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td align="center" valign="middle"><table width="200" height="180"  border="0" cellpadding="0" cellspacing="0" background="Image/LoginBack.gif">
        <tr>
          <td align="center"><img src="Image/Logo.gif" width="157" height="40">            <table  border="0" cellspacing="0" cellpadding="3">
            <form name="form1" method="post" action="">
              <tr>
                <td>管理帐号:</td>
                <td><input type="text" name="UserName" style="width:100px"></td>
              </tr>
              <tr>
                <td>管理密码:</td>
                <td><input type="password" name="PassWord" style="width:100px"></td>
              </tr>
              <tr>
                <td>验证码&nbsp;&nbsp;:</td>
                <td>
                  <input name="GetCode" type="text" size="12" style="width:50px">
                  <script language="JavaScript">document.write("<img src='GetCode.asp?"+ Math.random() +"'align=absMiddle width=40 height=10>")</script></td>
              </tr>
              <tr>
                <td>&nbsp;</td>
                <td>
                  <input name="Submit" type="image" src="Image/Login.gif" width="35" height="20" border="0">
                  <input name="Reset" type="image" src="Image/LoginReset.gif" width="35" height="20" border="0" onClick="form1.reset();return false;">
                </td>
              </tr>
            </form>
          </table></td>
        </tr>
      </table></td>
  </tr>
</table>
</body>
</html>
<%Call ConnClose%>

⌨️ 快捷键说明

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