?? admin.asp
字號:
<%
' 乘風電影 Access版
' 制 作：乘 風
' 開發網站：乘風原創程序
' 網站網址：http://www.qqcf.com
' 程序演示：http://www.qqcf.com/?action=try
' 最新版本下載：http://www.qqcf.com/?action=down
' 功 能：
' 1.系統做免費或收費的電影網站都可以，支持免費，點數，包月等方式觀看和下載電影
' 2.支持全站生成htm靜態頁面，生成速度極快，全自動生成
' 3.支持防盜鏈，可完全整合Helix和Servu服務器，完善的防盜鏈機制
' 4.在后臺可以自由管理網站上的廣告
' 5.支持網站上的注冊用戶在線支付購買電影點數，也可升級包月等方式
' 6.可以完全整合原有網站上的注冊用戶使用，無需在電影系統重新注冊直接登陸即可
%>
<!--#Include File="Conn.asp"-->
<!--#Include File="QQCF_MyFunCtion.asp"-->
<!--#Include File="QQCF_Md5.asp"-->
<!--#Include File="QQCF_GetCookie.asp"-->
<%
IF Request("Action")="login" Then
Admin=GoBack(ChkStr(Request("Admin"),1),"請輸入管理員名稱")
Pwd=GoBack(ChkStr(Request("Pwd"),1),"請輸入管理員密碼")
Cookies_Time=CInt(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 "QQCF_Admin_Manage.asp"
End If
If Session("CFFilmAdmin")="ok" Then Response.Redirect "QQCF_Admin_Manage.asp"
%>
<HTML><HEAD><TITLE><%=RsSet("Title")%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<!--#include file="QQCF_Style.asp"-->
<script language=JavaScript>
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="98%" 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="800px"></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><IMG height=14 src="QQCF_CheckCode.asp"></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="920px"></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 + -