📄 admin.asp
字号:
<%
'乘风电影程序
'制作：乘 风
'QQ：178575
'E-Mail：yliangcf@163.com
'开发网站：http://www.qqcf.com
'详细简介：http://www.qqcf.com/?action=list&list=cffilm
'上面有程序在线演示，安装演示，使用疑难解答，最新版本下载等内容
'因为这些内容可能时常更新，就没有放在程序里，请自己上网站上查看
'有完整版本的演示，包括如何实际整合Helix,Serv-u完全的实现在线播
'放和下载防盗链等
%>
<!--#Include File="Conn.asp"-->
<!--#Include File="CF_MyFunCtion.asp"-->
<!--#Include File="CF_Md5.asp"-->
<!--#Include File="CF_GetCookie.asp"-->
<%
IF Request("Action")="login" Then
Admin=GoBack(ChkStr(Request("Admin"),1),"请输入管理员名称")
Pwd=GoBack(ChkStr(Request("Pwd"),1),"请输入管理员密码")
Cookies_Time=CLng(ChkStr(Request("Cookies_Time"),1))
CheckCode=Trim(Request("CheckCode"))
If Session("ValidCode")<>CheckCode Then Call AlertUrl("四位数字的验证码输入错误!","Admin.asp")
Set Rs = Server.CreateObject("ADODB.Recordset")
Sql="Select * From CFFilm_Admin where Admin='"&Admin&"'"
rs.open sql,conn,1,1
IF Rs.eof and Rs.bof Then Call AlertUrl("没有此管理员名称!","Admin.asp")
IF Rs("Pwd")<>Md5(Pwd,1) Then Call AlertUrl("密码错误!","Admin.asp")
Session("CFFilmAdmin")="ok"
CFFilmAdminCookie=Md5(0&Admin&Pwd&GetMySet("SysCode"),1)
If Cookies_Time>0 Then
Response.Cookies("CFFilmAdminCookie")=CFFilmAdminCookie
Cookies_Time_2=Dateadd("n",Cookies_Time,Now())
Response.Cookies("CFFilmAdminCookie").expires=Cookies_Time_2
End If
Ip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If Ip = "" Then Ip=Request.ServerVariables("REMOTE_ADDR")
Sql="Update CFFilm_Admin Set Ip='"&Ip&"',LoginTotal=LoginTotal+1,LastLoginTime=Now(),Cookies='"&CFFilmAdminCookie&"'"
Conn.ExeCute Sql
Response.Redirect "CF_Admin_Manage.asp"
End If
If Session("CFFilmAdmin")="ok" Then Response.Redirect "CF_Admin_Manage.asp"
%>
<HTML><HEAD><TITLE><%=RsSet("Title")%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<!--#include file="CF_Style.asp"-->
<script language=JavaScript>
function changeimg()
{
document.getElementById("ccimg").src = 'CF_CheckCode.asp?a=' + Math.random();
}
function check()
{
if(window.document.form1.admin.value=="")
{
alert("请输入管理员名称!");
window.document.form1.admin.focus();
return false;
}
if(window.document.form1.pwd.value=="")
{
alert("请输入管理员密码!");
window.document.form1.pwd.focus();
return false;
}
if(window.document.form1.checkcode.value=="")
{
alert("请输入四位数字的验证码!");
window.document.form1.checkcode.focus();
return false;
}
return true;
}
</script>
</HEAD>
<BODY>
<table width="980" border="0" align="center" cellpadding="2" cellspacing="0">
<tr>
<td valign="top"><table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td width="51%" valign="top"><TABLE align=center border=0 cellPadding=0 cellSpacing=0
width="100%">
<TR>
<TD class=td1> </TD>
<TD class=td2 width="936"></TD>
<TD class=td3></TD>
</TR>
</TABLE>
<TABLE align=center bgColor=#cccccc cellPadding=0 cellSpacing=1
style="WORD-BREAK: break-all" width="100%">
<TR bgColor=#ffffff>
<TD colSpan=2 vAlign=top><br>
<br>
<table width="300" align="center" class=tba>
<tr class="tba_tr_1">
<td colspan="2"><div align="center"><strong>超级管理员入口</strong></div></td>
</tr>
<form name="form1" method="post" action="?action=login" onsubmit="return check()">
<tr>
<td width="291"><div align="right">名称：</div></td>
<td width="715"><input name="admin" type="text" id="admin3" size="15"></td>
</tr>
<tr>
<td><div align="right">密码：</div></td>
<td><input name="pwd" type="password" id="pwd" size="15"></td>
</tr>
<tr>
<td><div align="right">Cookie：</div></td>
<td><select name="cookies_time" id="cookies_time">
<option value="0" selected>不保留</option>
<option value="1440">保留一天</option>
<option value="43200">保留一个月</option>
<option value="15768000">保留一年</option>
</select> </td>
</tr>
<TR>
<TD><div align="right">验证码：</div></TD>
<TD><INPUT id=checkcode type=text size=4 name=checkcode><a href="javascript:changeimg()" title="看不清楚？换一个！"><IMG id="ccimg" height=14 src="CF_CheckCode.asp" border="0"></a></TD>
</TR>
<tr>
<td colspan="2"> <div align="center">
<input type="submit" name="Submit" value="确定">
<input type="reset" name="Submit523" value="取消">
</div></td>
</tr>
</form>
</table>
<div align="center"><br><a href="Index.asp">
返回首页</a></div><br>
</TD>
</TR>
</TABLE>
<TABLE align=center border=0 cellPadding=0 cellSpacing=0
width="100%">
<TR>
<TD class=td4></TD>
<TD class=td5 width="964"></TD>
<TD class=td6></TD>
</TR>
</TABLE></td>
</tr>
</table></td>
</tr>
</table>
</BODY>
</HTML>
<%Call ConnClose()%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -