📄 adminlogin.asp

📁 零度白茶影视系统好东西要大家分享
💻 ASP
字号:
<%@language=vbscript codepage=936 %>
<%
option explicit
'强制浏览器重新访问服务器下载页面，而不是从缓存读取页面
Response.Buffer = True 
Response.Expires = -1
Response.ExpiresAbsolute = Now() - 1 
Response.Expires = 0 
Response.CacheControl = "no-cache" 
'主要是使随机出现的图片数字随机
%>
<html>
<head>
<title>管理员登录</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../inc/Admin_Style.css">
<script language=javascript>
<!--
function SetFocus()
{
if (document.Login.UserName.value=="")
	document.Login.UserName.focus();
else
	document.Login.UserName.select();
}
function CheckForm()
{
	if(document.Login.UserName.value=="")
	{
		alert("请输入用户名！");
		document.Login.UserName.focus();
		return false;
	}
	if(document.Login.Password.value == "")
	{
		alert("请输入密码！");
		document.Login.Password.focus();
		return false;
	}
	if (document.Login.CheckCode.value==""){
       alert ("请输入您的验证码！");
       document.Login.CheckCode.focus();
       return(false);
    }
}

function CheckBrowser() 
{
  var app=navigator.appName;
  var verStr=navigator.appVersion;
  if (app.indexOf('Netscape') != -1) {
    alert("友情提示：\n    你使用的是Netscape浏览器，可能会导致无法使用后台的部分功能。建议您使用 IE6.0 或以上版本。");
  } 
  else if (app.indexOf('Microsoft') != -1) {
    if (verStr.indexOf("MSIE 3.0")!=-1 || verStr.indexOf("MSIE 4.0") != -1 || verStr.indexOf("MSIE 5.0") != -1 || verStr.indexOf("MSIE 5.1") != -1)
      alert("友情提示：\n    您的浏览器版本太低，可能会导致无法使用后台的部分功能。建议您使用 IE6.0 或以上版本。");
  }
}
//-->
</script>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td bgcolor="FC6C03"><img src="../images/logotitle.gif" width="350" height="50"></td>
  </tr>
  <tr>
    <td height="25">&nbsp;</td>
  </tr>
  <tr>
    <td>
	<table width="408" border="0" cellspacing="0" cellpadding="3" align="center">
	<form name="Login" action="AdminChkLogin.asp" method="post" target="_parent" onSubmit="return CheckForm();">
        <tr bgcolor="FC8403">
          <td colspan="2"><img src="../images/logotu.gif" width="153" height="22"></td>
        </tr>
        <tr bgcolor="f5f5f5">
          <td width="32%" align="right"><strong>用户名：</strong></td>
          <td width="68%" height="40" bgcolor="f5f5f5">
		  <input name="UserName"  type="text"  id="UserName4" maxlength="20">
		  </td>
        </tr>
        <tr bgcolor="f5f5f5">
          <td align="right"><strong>密　码：</strong></td>
          <td height="40">
		  <input name="Password"  type="password" maxlength="20">
		  </td>
        </tr>
        <tr bgcolor="f5f5f5">
          <td align="right"><strong>验证码：</strong></td>
          <td height="40">
		  <input name="CheckCode" size="6" maxlength="4">
             <%
				dim temprnd
				Randomize
				temprnd=cstr(Int((9999 - 1000 + 1) * Rnd() + 1000))
				response.Write (temprnd)
			  %>
           <input type="hidden" name="reotherpwd" value="<%=temprnd%>">
		    </td>
        </tr>
        <tr bgcolor="f5f5f5">
          <td height="40" colspan="2" align="center">　<font color="#FFFFFF">
            <input type="submit" name="Submit" value="登 录">
            &nbsp; &nbsp;
            <input type="reset" name="Submit2" value="重 写" >
           </td>
        </tr>
      </form>
    </table></td>
  </tr>
  <tr>
    <td height="33">&nbsp;</td>
  </tr>
</table>
<p>&nbsp;</p>
</body>
</html>
⌨️ 快捷键说明

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