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

📄 admin_p1.asp

📁 1、采用4.5修改而成。 2、添加了求片区
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!-- #include file="check.asp" -->
<%'====================================================================
'=              Copyright (c) 2005,马克斯(QQ448265)开 发             =
'=                      All rights reserved.                        =
'=------------------------------------------------------------------=
'=                     文件名称:admin_p.asp                   =
'=                     摘    要:后台—数据处理                 =
'=------------------------------------------------------------------=
'=                     用   途:免费电影系统                         =
'=                     最后更新:2007-07-1                         =
'====================================================================%><html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>后台管理中心</title>
<LINK href="admin.css" type=text/css rel=stylesheet>
<script src="editer/edithead.js"></script>
<script src="editer/edit.js"></script></head>
<BODY><script>
function mygo(){
document.form2.zt_content.value=content.document.body.innerHTML;	
}
function setid()
{
str='';
if(!document.all.no.value)
document.all.no.value=1;

for(i=1;i<=document.all.no.value;i++)
{
if(document.all.no.value<10)
{
str+=document.all.no1.value+'0'+i+''+document.all.no2.value+'\r';
}  
else if(document.all.no.value<100)
{
	if(i<10)
	{
	str+=document.all.no1.value+''+'0'+i+''+document.all.no2.value+'\r';
	}
	else
	{
	str+=document.all.no1.value+''+i+''+document.all.no2.value+'\r';
	}
} 
else if(document.all.no.value<1000)
{
	if(i<10)
	{
	str+=document.all.no1.value+''+'00'+i+''+document.all.no2.value+'\r';
 	} 
else if(i<100)
	{
	str+=document.all.no1.value+''+'0'+i+''+document.all.no2.value+'\r';
 	}
	else
	{
	str+=document.all.no1.value+''+i+''+document.all.no2.value+'\r';
	}
}
}
form2.zt_url.value=''+str+'';
} 
</script><%
function formatstrback(thisstr)
			If len(thisstr)>0 Then
				thisstr=replace(thisstr,"&shuangyinhao","""")
				thisstr=replace(thisstr,"&danyinhao","\'")
				thisstr=replace(thisstr,"&feifagang","\")
				thisstr=replace(thisstr,"&xuegang","/")
				thisstr=replace(thisstr,"&xiaoyuhao","<")
				thisstr=replace(thisstr,"&dayuhao",">")
				thisstr=replace(thisstr,Chr(13) & Chr(10),"")
				thisstr=replace(thisstr,Chr(13),"")
				thisstr=replace(thisstr,Chr(10),"")
				thisstr=replace(thisstr,Chr(9),"&nbsp;&nbsp;&nbsp;&nbsp;")
			End If
			formatstrback = thisstr
        End Function
action=replace(trim(request("Action")),"'","''")
if action="edit" then
id=clng(request("zt_id"))
set rs=conn.execute("select * from zt_data where zt_id="&id)
zt_type=rs("zt_type")
zt_name=rs("zt_name")
zt_pic=rs("zt_pic")
zt_tj=rs("zt_tj")
zt_dy=rs("zt_dy")
zt_dy1=rs("zt_dy1")
zt_zy=rs("zt_zy")
zt_dq=rs("zt_dq")
zt_color=rs("zt_color")
zt_lz=rs("zt_lz")
zt_url=rs("zt_url")
zt_url1=rs("zt_url1")
zt_content=rs("zt_content")
zt_content=replace(zt_content,chr(13)&chr(10),"<br>")
zt_content=replace(zt_content,"'","""")
rs.close%>
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="1" class="tableBorder">
  <tr> 
    <th colspan="2">编辑数据</th>
  </tr><form name="form2" method="post" action="?action=save" onsubmit="return mygo();" onreset="content.document.body.innerHTML='';"><INPUT TYPE="hidden" name="zt_id" value="<%=id%>">
   <tr> 
    <td height="22" align="right" class="forumRowHighlight">数据名称:</td>
    <td class="forumRow"><input name="zt_name" type="text" size="20" value="<%=zt_name%>">&nbsp;颜色:<select name="zt_color" >
<option style="background-color:<%=zt_color%>;color: <%=zt_color%>" value="<%=zt_color%>"><%=zt_color%></option>
<option style="background-color:#FF0000;color: #FF0000" value="#FF0000">#FF0000</option>
<option style="background-color:#FFFF00;color: #FFFF00" value="#FFFF00">#FFFF00</option>
<option style="background-color:#FF33CC;color: #FF33CC" value="#FF33CC">#FF33CC</option>
<option style="background-color:#00FF00;color: #00FF00" value="#00FF00">#00FF00</option>
<option  value="">清除</option>
</select>&nbsp;状态:<input name="zt_lz" type="text" size="12" value="<%=zt_lz%>">&nbsp;类型:<select name="zt_type" size="1">
<%
set rs=conn.execute("SELECT zt_typeid,zt_typename FROM zt_type where zt_typeid="&zt_type)
zt_typename=rs("zt_typename")
rs.Close
set rs=conn.execute("SELECT zt_typeid,zt_typename FROM zt_type order by zt_n")
do while not rs.eof%><option value="<%=rs("zt_typeid")%>" <%if rs("zt_typeid")=zt_type then response.write"selected"%>><%=rs("zt_typename")%></option><%  
rs.movenext  
loop 
rs.Close
%></select></td>
  </tr>
    <tr> 
    <td height="22" align="right" class="forumRowHighlight">图片地址:</td>
    <td class="forumRow"><input name="pic" type="text" size="40" value="<%=zt_pic%>">&nbsp;←<a href="javascript:" onClick="document.form2.pic.value=''">清除</a>&nbsp;<iframe src="up/upload.htm" scrolling="no" topmargin="0" width="300" height="24" marginwidth="0" marginheight="0" frameborder="0" align="center"></iframe></td>
  </tr>
  <tr> 
    <td height="22" align="right" class="forumRowHighlight">主			演:</td>
    <td class="forumRow"><input name="zt_zy" type="text" size="40" value="<%=zt_zy%>">&nbsp;<input type="checkbox" name="zt_date" value="1" checked />是否更新时间</td>
  </tr>
       <tr> 
    <td height="22" align="right" class="forumRowHighlight">服务器ID:</td>
    <td class="forumRow"><input name="zt_dq" type="text" size="20" value="<%=zt_dq%>">(迅雷本地资源专用,盗链此项不用填,迅雷二为迅雷联盟里的资源)</td>
  </tr>
<tr> 
    <td height="22" align="right" class="forumRowHighlight">播放器选择①:</td>
    <td class="forumRow"><input name="zt_dy" type="text" size="40" value="<%=zt_dy%>">&nbsp;←<a href="javascript:" onClick="document.form2.zt_dy.value='xunlei'">迅雷一</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy.value='xunlei2'">迅雷二</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy.value='tudou'">土豆</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy.value='56'">我乐</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy.value='iask'">新浪</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy.value='youku'">优酷</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy.value='6rooms'">六房间</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy.value='ouou'">偶偶</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy.value='tvix'">tvix</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy.value='play'">Flv地址</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy.value='real'">real</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy.value='media'">media</a></td>
  </tr>
        <tr> 
    <td height="22" align="right" class="forumRowHighlight">影片设定:</td>
    <td class="forumRow"><input type="text" name="no1" class="searchinput" value="" size="40">&nbsp;集数:<input type="text" name="no" class="searchinput" value="10" size="5">&nbsp;格式:<input type="text" name="no2" class="searchinput" value=".rmvb" size="8">&nbsp;<input type="button" name="Button" class="input" onClick="setid();" value="设定">(非本地资源本设置无用)</td>
  </tr>
   <tr> 
    <td height="22" align="right" class="forumRowHighlight">数据地址①:</td>
    <td class="forumRow"><TEXTAREA NAME="zt_url" ROWS="8" COLS="100"><%=zt_url%></TEXTAREA></td>
  </tr>
   <tr> 
    <td height="22" align="right" class="forumRowHighlight">播放器选择②:</td>
    <td class="forumRow"><input name="zt_dy1" type="text" size="40" value="<%=zt_dy1%>">&nbsp;←<a href="javascript:" onClick="document.form2.zt_dy1.value='xunlei'">迅雷一</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy1.value='xunlei2'">迅雷二</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy1.value='tudou'">土豆</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy1.value='56'">我乐</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy1.value='iask'">新浪</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy1.value='youku'">优酷</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy1.value='6rooms'">六房间</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy1.value='ouou'">偶偶</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy1.value='tvix'">tvix</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy1.value='play'">Flv地址</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy1.value='real'">real</a>&nbsp;<a href="javascript:" onClick="document.form2.zt_dy1.value='media'">media</a></td>
  </tr>
   <tr> 
    <td height="22" align="right" class="forumRowHighlight">数据地址②:</td>
    <td class="forumRow"><TEXTAREA NAME="zt_url1" ROWS="8" COLS="100"><%=zt_url1%></TEXTAREA></td>
  </tr>
  <tr> 
    <td height="22" align="right" class="forumRowHighlight">相关介绍:</td>
    <td class="forumRow"><input type="hidden" name="zt_content"><%content=formatstrback(zt_content)%><!--#include file=editer/editer.htm--></td>
  </tr>
  <tr> <input type="hidden" name="zt_post_e" value="<%=Replace(request.ServerVariables("HTTP_REFERER"),"&",",")%>" />
    <td class="forumRow" colspan=2 align=center><input type=Submit class=button value="确认保存" name=Submit>&nbsp;<input type=reset name=Submit2 class=button value="清 除">&nbsp;<input type=button class=button value="返 回" onclick="javascript:history.go(-1);"></td>
  </tr>
  </form>
</table>
<%
elseif action="delete" then
url=request.ServerVariables("HTTP_REFERER")
id=cint(request.querystring("zt_id"))
zt_en=Trim(request("zt_en"))
conn.execute("delete from zt_data where zt_id="&id)
delfolder"../"&zt_en&"/"&id&""
response.redirect url
elseif action="delall" then
url=request.ServerVariables("HTTP_REFERER")
id=request.Form("zt_id")
If id="" Then response.write"<script language=javascript>alert('没有选择数据');history.go(-1);</script>":response.End
response.write id
zt_en=Trim(request("zt_en"))
conn.execute("delete from zt_data where zt_id in("&id&")")
zt_del1=Split(id,", ")
zt_del2=UBound(zt_del1)
zt_del3=Split(zt_en,", ")
For i=0 To zt_del2
delfolder"../"&zt_del3(i)&"/"&zt_del1(i)&""
Next 
response.redirect url
elseif action="save" then
id=cint(request("zt_id"))
zt_post_e=request.form("zt_post_e")
zt_type=trim(request.form("zt_type"))
zt_name=trim(request.form("zt_name"))
zt_url=trim(request.form("zt_url"))
zt_url1=trim(request.form("zt_url1"))
zt_pic=trim(request.form("pic"))
zt_color=trim(request.form("zt_color"))
zt_dy=trim(request.form("zt_dy"))
zt_dy1=trim(request.form("zt_dy1"))
zt_zy=trim(request.form("zt_zy"))
zt_dq=trim(request.form("zt_dq"))
zt_lz=trim(request.form("zt_lz"))
zt_date=trim(request.form("zt_date"))
If zt_date="" Or IsNull(zt_date) Then zt_date=0
zt_content=trim(request.form("zt_content"))
zt_content=replace(zt_content,"'","‘")
upadtesql="zt_type="&zt_type&",zt_name='"&zt_name&"',zt_color='"&zt_color&"',zt_url='"&zt_url&"',zt_url1='"&zt_url1&"',zt_content='"&zt_content&"',zt_pic='"&zt_pic&"',zt_dy='"&zt_dy&"',zt_dy1='"&zt_dy1&"',zt_zy='"&zt_zy&"',zt_dq='"&zt_dq&"',zt_lz='"&zt_lz&"'"
If zt_date=1 Then upadtesql=upadtesql&",zt_date='"&now()&"'"
conn.execute("update zt_data set "&upadtesql&" where zt_id="&id)
response.write "<script language=javascript>location.href='make_view_play.asp?zt_id="&id&"&posturl=edit&zt_post_e="&zt_post_e&"';</script>"
'response.redirect "?action=edit&zt_id="&id
elseif action="tj" then
url=request.ServerVariables("HTTP_REFERER")
id=cint(request("zt_id"))
conn.execute("update zt_data set zt_tj=1 where zt_id="&id)
response.redirect url
elseif action="tj2" then
url=request.ServerVariables("HTTP_REFERER")
id=cint(request("zt_id"))
conn.execute("update zt_data set zt_tj=2 where zt_id="&id)
response.redirect url
elseif action="notj" then
url=request.ServerVariables("HTTP_REFERER")
id=cint(request("zt_id"))
conn.execute("update zt_data set zt_tj=0 where zt_id="&id)
response.redirect url
end if%>
</body></html>

⌨️ 快捷键说明

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