📄 film_sort.asp
字号:
else
'/////////////////显示所有
sql="SELECT ID,小图,分类,出产地,影片名,主演,显示,人气,加入时间,格式,集数,DVD FROM 影片 where 显示='是' order by id desc"
end if
'////结束sql
rs.Open sql,conn,1,1
if not rs.eof then
'///////////////////开始分页代码//////////////////////////////////
cardnumber=rs.recordcount
if Rq("page")="" then page="1" else page=Rq("page") end if
PageSize = film_sortlist
rs.PageSize = PageSize
pgnum=rs.Pagecount
if page="" or clng(page)<1 then page=1
if clng(page) > pgnum then page=pgnum
if pgnum>0 then rs.AbsolutePage=page
'///////////////////结束分页代码//////////////////////////////////
i=1
do while not rs.eof and i-1<rs.PageSize
%>
<td>
<table cellspacing=0 cellpadding=3
align=center border=0 bgcolor="#CCCCCC" width="375">
<tbody>
<tr bgcolor="#999999">
<td height="5" colspan="2"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF"> <br>
<table cellspacing=0 cellpadding=0 width=122 align=center
border=0>
<tbody>
<tr>
<td width=118 bgcolor=#cccccc>
<table cellspacing=1 cellpadding=3 width="100%"
border=0>
<tbody>
<tr>
<td valign=top bgcolor=#ffffff>
<%if site_runscript="asp" then
Rw "<a href=film_view.asp?id="&rs("id")&"><img src='../"&film_pic&"/"&rs("小图")&"' width="&ayang_picwidth&" height="&ayang_picheight&" border=0 title="&rs("影片名")&"></a>"
else
Rw "<a href=film_view_"&md5(rs("id"),32)&".html><img src='../"&film_pic&"/"&rs("小图")&"' width="&ayang_picwidth&" height="&ayang_picheight&" border=0 title="&rs("影片名")&"></a>"
end if%></td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
<td bgcolor="#FFFFFF" valign="top"> <br>
<table cellspacing=0 cellpadding=0 width="99%"
align=left border=0>
<tbody>
<tr>
<td align=middle height="23">
<div align="left"><b>
<%if site_runscript="asp" then
Rw "<a href=film_view.asp?id="&rs("id")&" title="&rs("影片名")&"><strong><font color=#ff6600>《"&left(rs("影片名"),15)&"》</font></strong></a>"
else
Rw "<a href=film_view_"&md5(rs("id"),32)&".html title="&rs("影片名")&"><font color=#ff6600>《"&left(rs("影片名"),15)&"》</font></strong></a>"
end if%>
</b></div>
</td>
</tr>
<tr>
<td align=middle background="images/line25.gif" height="1"></td>
</tr>
<tr>
<td align=middle height="1">
<table cellspacing=0 cellpadding=0 width=50% align=center border=0>
<tbody>
<tr>
<td height=8></td>
</tr>
</tbody>
</table>
<table cellspacing=0 cellpadding=1 width="98%"
border=0 height="188">
<tbody>
<tr>
<td width="34%">
<div align=center><strong><font color="#666666">产 地：</font></strong></div>
</td>
<td width="66%"><font color="#666666"><%=rs("出产地")%></font></td>
</tr>
<tr>
<td colspan=2><img height=1
src="images//line_200.gif"
width=200></td>
</tr>
<tr>
<td>
<div align=center><strong><font color="#666666">主 演：</font></strong></div>
</td>
<td><font color="#666666"><%=rs("主演")%></font></td>
</tr>
<tr>
<td colspan=2><img height=1
src="images//line_200.gif"
width=200></td>
</tr>
<tr>
<td>
<div align=center><strong><font color="#666666">影片类型：</font></strong></div>
</td>
<td><font color="#000000"> <font color="#666666">
<%
if id<>0 then
Rw lx
else
Rw readtype(rs("分类"))
end if
%>
</font></font></td>
</tr>
<tr>
<td colspan=2><img height=1
src="images//line_200.gif"
width=200></td>
</tr>
<tr>
<td>
<div align=center><strong><font color="#666666">格 式：</font></strong></div>
</td>
<td><img src="../images/<%=rs("格式")%>.gif" align=absmiddle><%if rs("DVD")="是" then Rw " <img src='images/dvd.gif' align='absmiddle' border='0' title='该影片为DVD影片'>"%></td>
</tr>
<tr>
<td colspan=2><img height=1
src="images//line_200.gif"
width=200></td>
</tr>
<tr>
<td>
<div align=center><strong><font color="#666666">人 气：</font></strong>
</div>
</td>
<td><img src="images/hits.gif" width="15" height="15" align="absmiddle">
<font color="#666666">
<%=rs("人气")%>
</font></td>
</tr>
<tr>
<td colspan=2><img height=1
src="images//line_200.gif"
width=200></td>
</tr>
<tr>
<td>
<div align=center><strong><font color="#666666">影片集数：</font></strong></div>
</td>
<td><font color="#666666"><%=rs("集数")%></font></td>
</tr>
<tr>
<td colspan=2><img height=1
src="images//line_200.gif"
width=200></td>
</tr>
<tr>
<td>
<div align=center><strong><font color="#666666">加入时间：</font></strong></div>
</td>
<td> <font color="#666666"><%=rs("加入时间")%></font></td>
</tr>
<tr>
<td colspan=2><img height=9
src="images//line_yin_200.gif"
width=200></td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
<%
if i mod 2 = 0 then Rw "</tr><tr><td height=10></td></tr><tr>"
i=i+1
rs.movenext
loop
else
shownext="false"
%>
<tr>
<td height="40">
<div align="center"><font color="#666666">暂 无</font></div>
</td>
<%end if
rs.close%>
</tr>
</tbody>
</table>
<%
if shownext<>"false" then
if Rq("admin_act")<>"gethtml" then%>
<table cellspacing=1 cellpadding=0 width=750 align=center border=0 class="td_m1" bgcolor="#CCCCCC">
<form name="form1" method="post" action="">
<tbody>
<tr>
<td height=35 bgcolor="#f5f5f5">
<div align="center"><font color="#666666">共<b><%=cardnumber%></b>条纪录 共<b><%=pgnum%></b>页 当前第<b><%=page%></b>页
<%if cint(page)<>1 then%>
<IMG height=10 src="images/bul_05.gif" width=10 border="0"> <a href="?page=1<%=urlstr%>">首页</a> <IMG height=10 src="images/bul_05.gif" width=10 border="0">
<a href="?page=<%=page-1%><%=urlstr%>">上一页</a>
<%end if
if cint(page)<>cint(pgnum) then%>
<IMG height=10 src="images/bul_05.gif" width=10 border="0"> <a href="?page=<%=page+1%><%=urlstr%>">下一页</a> <IMG height=10 src="images/bul_05.gif" width=10 border="0">
<a href="?page=<%=pgnum%><%=urlstr%>">尾页</a>
<%end if%>
跳转到</font>
<select name="page" onChange="javascript:submit()">
<%for i = 1 to pgnum%>
<option value="<%=i%>" <%if cint(page)=cint(i) then%> selected <%end if%>>第<%=i%>页</option>
<%next%>
</select>
</div>
</td>
</tr>
</tbody>
</form>
</table>
<%else%>
<table width="750" border="0" cellspacing="1" cellpadding="0" align="center" bgcolor="#CCCCCC">
<tr>
<td height="35" bgcolor="#f5f5f5">
<div align="center"><font color="#666666">共<b><%=cardnumber%></b>条纪录 共<b><%=pgnum%></b>页 当前第<b><%=page%></b>页
<%if cint(page)<>1 then%>
<IMG height=10 src="images/bul_05.gif" width=10 border="0"> <a href="film_sort_<%=md5(id,32)%>_1.html">首页</a> <IMG height=10 src="images/bul_05.gif" width=10 border="0"> <a href="film_sort_<%=md5(id,32)%>_<%=page-1%>.html">上一页</a>
<%end if
if cint(page)<>cint(pgnum) then%>
<IMG height=10 src="images/bul_05.gif" width=10 border="0"> <a href="film_sort_<%=md5(id,32)%>_<%=page+1%>.html">下一页</a> <IMG height=10 src="images/bul_05.gif" width=10 border="0"> <a href="film_sort_<%=md5(id,32)%>_<%=pgnum%>.html">尾页</a>
<%end if%>
跳转到</font>
<select name="menu1" onChange="MM_jumpMenu('parent',this,0)">
<%for i=1 to pgnum%>
<option value="film_sort_<%=md5(id,32)%>_<%=i%>.html" <%if clng(page)=clng(i) then response.write "selected"%>>第<%=i%>页</option>
<%next%>
</select>
</div>
</td>
</tr>
</table>
<%end if
end if%>
<br>
<br>
</TD>
</TR></TBODY></TABLE>
<%copyright%>
</BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -