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

📄 movie_list.asp

📁 很好的企业网站管理系统!可以适应各种不同的小型企业!
💻 ASP
📖 第 1 页 / 共 2 页
字号:
🔍
12 
<html>
<head>
<title>管理中心 -晓宇听幽 网站内容管理系统</title>
<meta copy="电影制作：xoyu（QQ：5964887）www.xoyu.com">
<link rel="stylesheet" href="admin.css" type="text/css">
<!--#include file="check.asp"-->
<%
'#################################################################
'#  晓宇听幽网站内容管理系统(xoYu CMS)
'# 
'#  版权所有: 晓宇听幽工作室
'#
'#  制作人  :  xoyu(晓宇)            
'#           
'#  主页地址: http://www.xoYu.com	    晓宇听幽工作室
'#  论坛地址: http://www.xoYu.com/bbs/	晓宇听幽讨论区
'#
'#【版权声明】
'#################################################################
'# 本软体为共享软体(shareware)提供个人网站免费使用，请勿非法修改,
'# 转载，散播，或用于其他图利行为，并请勿删除版权声明。
'# 如果您的网站正式起用了这个脚本，请您通知我们，以便我们能够知晓！
'# 如果可能，请在您的网站做上我们的链接，希望能给予合作。谢谢！
'#################################################################
'# 电影名称：晓宇听幽网站内容管理系统·电影管理系统
'# 英文名称：xoYu News 2004 Professional For xoYu CMS
'# 电影创建时间：2003-7-10
'# 电影完成时间：2003-9-11
'# 最后修改时间：2003-11-15
'#################################################################
'# 请您尊重我们的劳动和版权，不要删除以上的版权声明部分，谢谢合作
'# 如有任何问题请到我们的论坛(http://www.xoyu.com/bbs/)告诉我们。 
'#################################################################
if CheckAdmin("DownAdminAll",xoYuStudioAdminAdmin) then
else
if CheckAdmin("DownAdd",xoYuStudioAdminAdmin) then
  NotMe=xoYuStudioAdminName
else
  response.write("<li>您没有进入本页面的权限!")
  response.end
end if
end if%>
<!--#include file="mdb_path_Movie.asp"-->
<!--#include file="Movieconfig.asp"-->
<%
set rs=server.CreateObject("ADODB.RecordSet")
thistype=thistype & "<a class=xoYuStudioSort href=Movie_List.asp>电影首页</a>"
if request("id")<>"" then
  rs.open "select * from Movietype where id="&request("id"),conn,1,1
    if not rs.EOF then
    tname=rs("tname")
    ts=rs("ts")
    tj=rs("tj")
        TN=split(rs("tname"),"|")
        TI=split(rs("ts"), ",")
          for i = 0 to ubound(TN)-1
            thistype=thistype & ">> <a class=xoYuStudioSort href=Movie_List.asp?id="&TI(i)&">"&TN(i)&"</a>"
          next       
Response.Write("<input type=""hidden"" name=""id"" value=""" & rs("id") & """>")
Response.Write("<input type=""hidden"" name=""tname"" value=""" & rs("tname") & """>")
Response.Write("<input type=""hidden"" name=""ts"" value=""" & rs("ts") & """>")
Response.Write("<input type=""hidden"" name=""tj"" value=""" & rs("tj") & """>")
    else
    response.write "<b>错误：</b>此ID号的类别不存在或已被删除!"
    response.end
    end if
  rs.close
end if
%>
<script language="javascript">
function deltype(id)
	{
		if (confirm('\n真的要删除该分类目录及其下面的所有分类和电影吗?'))
		  if (confirm('\n再次确认!!!\n\n\n真的要删除该分类目录及其下面的所有分类和电影吗!?'))
			location="movie_type_del.asp?sortid=<%=request("id")%>&id="+id
        }

function delcx(id)
{window.open("movie_del.asp?id="+id,"","width=150,height=20,resizable=yes,scrollbars=yes,status=yes,toolbar=no,menubar=no,location=no");}
function xoYuStudioMakeHTML(id)
{window.open("makemovie.asp?type=page&id="+id,"","width=150,height=20,resizable=no,scrollbars=no,status=no,toolbar=no,menubar=no,location=no");}


function xoYuStudio() {
	for (var i=0;i<document.xoYuStudioH.xoYuStudioID.length;i++) {
		var e=document.xoYuStudioH.xoYuStudioID[i];
		e.checked=!e.checked;
	}
}
</script>
</head>

<body class="forumrow" topmargin="1" leftmargin="1">
 
<table border="0" width="98%" align=center class="tableBorder"> 
  <tr> 
    <td width="100%" bgcolor="#7B9AE7" class="tableHeaderText" height=25> <B>栏目位置：</B><%=thistype%></td> 
  </tr> 
  <tr>
    <td width="100%" class="forumrow">
<table border="0" cellspacing="0" width="100%" cellpadding="0"> 
<tr> 
<th width="25%" class="tableHeaderText" height=25>
<p align="left">&nbsp;栏目名称
</th>
<th class="tableHeaderText" height=25>
<p align="left">操作
</th>
</tr>
<%
set rs_list=server.CreateObject("ADODB.RecordSet")
if request("id")<>"" then
rs_list.open "select * from Movietype where tn="&request("id")&" order by id",conn,1,1
else
rs_list.open "select * from Movietype where tj=1 order by id",conn,1,1
end if

if NOT rs_list.EOF then
do while NOT rs_list.EOF
%>
<tr colspan="2">
<%
for t=1 to 1
if NOT rs_list.EOF then
TTNN=split(rs_list("tname"),"|")(rs_list("tj")-1)
Response.Write("<td width='25%' nowrap class='forumrow'><img src=images/plus.gif width=15 height=15>")%>
<b><a href=Movie_List.asp?id=<%=rs_list("id")%>><%=TTNN%></a></b>&nbsp;(栏目ID:<%=rs_list("id")%>)</td><td class="forumrow"> 
<div align="right"><a href='javascript:deltype(<%=rs_list("id")%>)' title="删除分类"><font color="#000066"><U>删除分类</U></font></a> | <a href="Movie_type_edit.asp?id=<%=rs_list("id")%>" title="修改类别"><font color="#000066"><U>修改类别</U></font></a> | <a href="Movie_makeListall.asp?type=all&ts=<%=ts%><%=rs_list("id")%>," title="生成当前类目及其以下所有子类的HTM页"><font color="#000066"><U>生成分类</U></font></a> | <a href="../movie/xoYuMovieList_<%=rs_list("id")%>_1.html" title="查看电影列表页" target="_blank"><font color="#000066"><U>查看文件</U></font></a> |<font color="#000066"><a title="生成本类最新文章js代码" href="makemoviejs.asp?tid=<%=rs_list("id")%>"><U>刷新JS</U></a></font>| <a href="Movie_List.asp?id=<%=rs_list("id")%>" title="查看本栏目下的电影"><font color="#000066"><U>查看电影</U></font></a> | <a href="movie_add.asp?id=<%=rs_list("id")%>" title="在本栏目下添加电影"><font color="#000066"><U>添加电影</U></font></a><?div></td>
<%rs_list.MoveNext                          
end if
next
%></tr>          
<%          
loop          
else          
Response.Write "此目录下没有子类别了"          
end if          
%>          
</table>
    </td> 
  </tr>
</table>
<table border="0" cellspacing="0" width="98%" cellpadding="0" class="tableBorder" align=center>
  <tr>
    <form name=add method="post" action="movie_type_add.asp?id=<%=request("id")%>&tname=<%=tname%>&ts=<%=ts%>&tj=<%=tj%>">
    <td bgcolor="#799ae1">
    <p align="left"><b>
    &nbsp;</b>当前类目操作：<INPUT TYPE="text" size=15 NAME="tname_add"><INPUT value="新建分类" type='submit'><b>&nbsp;<a href="movie_add.asp?id=<%if request("tj")>1 then%><%=request("id")%><%end if%>" title="在当前类目下添加新电影">添加电影</a></b></td>
       </form>
       <td height="8" bgcolor="#799ae1">
    <form action="movie_add1.asp" method=post>
<input type="checkbox" name="id" value="<%=request("id")%>">当前目录<input type="checkbox" name="d" value="add" checked><a href="javascript:" title="此功能用于当你要添加新电影时查找电影是否以存在,如果不存在则自动进入添加电影页面;使用此功能时只搜索[全部电影]电影名">添加查找</a><input name="k" size="12"><input type="submit" value="查找"></td>
    </form>    </td>

</table>
  <br>
<table border="0" width="98%" cellspacing="1" class="tableBorder" align=center> 
  <tr> 
    <td width="100%">
    <table border="0" cellspacing="0" class="tableBorder" width="100%" cellpadding="0">
      <tr>
12

⌨️ 快捷键说明

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