📄 film_sort.asp
字号:
</tr>
<tr>
<td background=images/left_03_ry_r2_c1.gif>
<%
on error resume next
set rs=server.createobject("adodb.recordset")
if id<>0 then
sql="SELECT top 10 ID,大图,小图,分类,人气,出产地,影片名,主演,显示,加入时间,详细介绍,观看次数 FROM 影片 where 显示='是' and 分类='"&id&"' order by 人气 desc"
else
sql="SELECT top 10 ID,大图,小图,分类,人气,出产地,影片名,主演,显示,加入时间,详细介绍,观看次数 FROM 影片 where 显示='是' order by 人气 desc"
end if
rs.Open sql,conn,1,1
if not rs.eof then
%>
<table cellspacing=0 cellpadding=2 width="90%" align=center
border=0>
<tbody>
<tr>
<td>
<%
for i=1 to 3 step 1
if not rs.eof then rs.movenext
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="16%" valign="top"><img height=23
src="images/top_no_0<%=i%>.gif" width=23></td>
<td width="84%">
<table cellspacing=0 cellpadding=0 width="100%"
border=0>
<tbody>
<tr>
<td width="35%" rowspan=2>
<table cellspacing=0 cellpadding=0 align=center
border=0>
<tbody>
<tr>
<td width=118 bgcolor=#cccccc>
<table cellspacing=1 cellpadding=3 width="100%"
border=0>
<tbody>
<tr>
<td bgcolor=#ffffff>
<%
if site_runscript="asp" then
Rw "<a title='影片名："&rs("影片名")&" 所属类："&readtype(rs("分类"))&" 出产地："&rs("出产地")&" 日 期："&datevalue(rs("加入时间"))&" 人 气："&rs("人气")&"' href=film_view.asp?id="&rs("id")&" target='_top'><img src='../"&film_pic&"/"&rs("小图")&"' width=50 height=50 border=0></a>"
else
Rw "<a title='影片名："&rs("影片名")&" 所属类："&readtype(rs("分类"))&" 出产地："&rs("出产地")&" 日 期："&datevalue(rs("加入时间"))&" 人 气："&rs("人气")&"' href=film_view_"&md5(rs("id"),32)&".html target='_top'><img src='../"&film_pic&"/"&rs("小图")&"' width=50 height=50 border=0></a>"
end if%></td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
<td width="65%">
<div align=center>
<%if site_runscript="asp" then
Rw "<a href=film_view.asp?id="&rs("id")&" title="&rs("影片名")&"><strong><font color=#ff6600>"&left(rs("影片名"),6)&"</font></strong></a>"
else
Rw "<a href=film_view_"&md5(rs("id"),32)&".html title="&rs("影片名")&"><font color=#ff6600>"&left(rs("影片名"),6)&"</font></strong></a>"
end if%>
</div>
</td>
</tr>
<tr>
<td>
<div
align=center><img src="images/tv.gif" align="absmiddle">观看：<%=rs("观看次数")%></div>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
<tr>
<td colspan="2" height="14">
<div align="center"><img height=9
src="images/line_top.gif" width=165></div>
</td>
</tr>
</table>
<%
next
for i= 4 to 10
if not rs.eof then rs.movenext
%> <table cellspacing=0 cellpadding=0 width="98%">
<tbody>
<tr>
<td class=b8 width="16%">
<div align=center><img height=13
src="images/top_no_0<%=i%>.gif" width=17></div>
</td>
<td width="59%" height=20>
<%if site_runscript="asp" then
Rw "<a href=film_view.asp?id="&rs("id")&" title="&rs("影片名")&">"&left(rs("影片名"),8)&"</a>"
else
Rw "<a href=film_view_"&md5(rs("id"),32)&".html title="&rs("影片名")&">"&left(rs("影片名"),8)&"</a>"
end if%>
</td>
<td width="25%" height=20>
<div align="right"><%=rs("观看次数")%></div>
</td>
</tr>
</tbody>
</table><%
next
rs.close
%>
</td>
</tr>
</tbody>
</table>
<%
else
Rw "<div align=center>暂无</div>"
end if
%>
</td>
</tr>
<tr>
<td><img height=16 src="images/left_03_ry_r4_c1.gif"
width=200></td>
</tr>
</tbody>
</table>
<table cellspacing=0 cellpadding=0 width=200 align=center border=0>
<tbody>
<tr>
<td><img height=52
src="images/viewhistory.gif" width=200 border=0></td>
</tr>
<tr>
<td background=images/left_02_002.gif>
<table cellspacing=0 cellpadding=2 width="90%" align=center
border=0>
<tbody>
<tr>
<td>
<IFRAME id=main src="view_history.asp"
frameBorder=0 width=100% scrolling=no height="365"></IFRAME></td>
</tr>
</tbody>
</table>
</td>
</tr>
<tr>
<td><img height=17 src="images/left_02_003.gif"
width=200></td>
</tr>
</tbody>
</table>
<table cellspacing=0 cellpadding=0 width=200 align=center border=0>
<tbody>
<tr>
<td><a href="http://www.mytv365.com/download/" target=_blank><img
height=52 src="images/softwaredown.gif" width=200
border=0></a></td>
</tr>
<tr>
<td valign=top background=images/affiche_r3_c1.gif>
<div align=center><a href="http://www.mytv365.com/download/"
target=_blank><img height=150 src="images/soft_down.jpg"
width=174 border=0></a> </div>
</td>
</tr>
<tr>
<td><img height=16 src="images/affiche_r5_c1.gif"
width=200></td>
</tr>
</tbody>
</table>
</DIV></TD>
<TD vAlign=top width=758 bgcolor="#ffffff"><%if Rq("admin_act")<>"gethtml" then%>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<form name="form3" method="post" action="">
<TR>
<TD>
<input type="hidden" name="order">
<script language=javascript>
function callorder(str){
document.all.order.value=str;
form3.submit();
}
</script>
<table cellspacing=0 cellpadding=0 border=0 align="right">
<tbody>
<tr>
<td><a href="####" onClick="callorder('下载次数');"><img
id=Image1 height=51 alt=下载次数排序
src="images/px1.gif" width=109
border=0 name=Image1></a></td>
<td><a href="####" onClick="callorder('观看次数');"><img
id=Image1 height=51 alt=观看次数排序
src="images/px2.gif" width=109
border=0 name=Image1></a></td>
<td><a href="####" onClick="callorder('加入时间');"><img
id=Image1 height=51 alt=加入时间排序
src="images/px3.gif" width=109
border=0 name=Image1></a></td>
<td><a href="####" onClick="callorder('人气');"><img
id=Image1 height=51 alt=人气排序
src="images/px4.gif" width=109
border=0 name=Image1></a></td>
<td valign="bottom" background="images/px5.gif" width="110">
<div align="center">
<table width="90%" border="0" align="right">
<tr>
<td>
<div align="center">
<select name="gra" onChange="javascript:submit()">
<option value="" selected>影片筛选</option>
<%
vip_name=split(vip_name,"|")
for i=0 to ubound(vip_name)
sel=""
if Rq("gra")<>"" then
if int(Rq("gra"))=int(i) then sel="selected"
end if
%>
<option value="<%=i%>" <%=sel%>><%=vip_name(i)%></option>
<%next%>
</select>
</div>
</td>
</tr>
</table>
</div>
</td>
</tr>
</tbody>
</table>
</TD>
</TR>
</form>
</TBODY>
</TABLE>
<%end if%><table cellspacing=0 cellpadding=0 width="760" align=center
border=0 valign="top">
<tbody>
<tr>
<%
set rs=server.createobject("adodb.recordset")
if Rq("keyword")<>"" then '////搜索
keyword=Rq("keyword")
serachfs=Rq("serachfs")
if serachfs="" then serachfs="主演"
application("serachkey")=Rq("keyword")&"|"&left(application("serachkey"),100)
sql="SELECT ID,小图,分类,出产地,影片名,主演,显示,人气,加入时间,详细介绍,格式,集数,DVD FROM 影片 where 显示='是' and "&serachfs&" like '%"&keyword&"%' order by id desc"
elseif Rq("order")<>"" and id<>0 then '排序
sql="SELECT ID,小图,分类,出产地,影片名,主演,显示,人气,加入时间,格式,集数,观看次数,下载次数,DVD FROM 影片 where 显示='是' and 分类='"&id&"' order by "&Rq("order")&" desc"
elseif Rq("order")<>"" then '###################排序
sql="SELECT ID,小图,分类,出产地,影片名,主演,显示,人气,加入时间,格式,集数,观看次数,下载次数,DVD FROM 影片 where 显示='是' order by "&Rq("order")&" desc"
elseif Rq("gra")<>"" and id<>0 then
sql="SELECT ID,小图,分类,出产地,影片名,主演,显示,人气,加入时间,开放级别,格式,集数,DVD FROM 影片 where 显示='是' and 分类='"&id&"' and 开放级别='"&Rq("gra")&"' order by id desc"
elseif Rq("gra")<>"" then
sql="SELECT ID,小图,分类,出产地,影片名,主演,显示,人气,加入时间,开放级别,格式,集数,DVD FROM 影片 where 显示='是' and 开放级别='"&Rq("gra")&"' order by id desc"
elseif id<>0 then
sql="SELECT ID,小图,分类,出产地,影片名,主演,显示,人气,加入时间,格式,集数,DVD FROM 影片 where 显示='是' and 分类='"&id&"' order by id desc"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -