📄 main.asp
字号:
<!--#include file="function.asp" -->
<html>
<head>
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td>
<div align="center">
<table cellspacing=5 cellpadding=0 width="100%" align=center border=0>
<tbody>
<tr valign=top>
<%
show=0
forci=0
show=5
set rs=server.createobject("adodb.recordset")
if request("sqlid")<>"" then sqlid=Rq("sqlid")
'///sql选择语句
if sqlid=1 then
sql="SELECT top "&show&" ID,小图,分类,人气,出产地,影片名,主演,显示,加入时间 FROM 影片 where 显示='是' order by 人气 desc"
elseif sqlid=2 then
sql="SELECT top "&show&" ID,小图,分类,人气,出产地,影片名,主演,显示,加入时间 FROM 影片 where 显示='是' order by 下载次数 desc"
elseif sqlid=3 then
sql="SELECT top "&show&" ID,小图,分类,人气,出产地,影片名,主演,显示,加入时间 FROM 影片 where 显示='是' order by 观看次数 desc"
elseif sqlid=4 and Request.Cookies(site_Cookies)("view_history")<>"" then
sql="SELECT top "&show&" ID,小图,分类,人气,出产地,影片名,主演,显示,加入时间 FROM 影片 where id in("&Request.Cookies(site_Cookies)("view_history")&") order by 显示 desc"
elseif Request.Cookies(site_Cookies)("view_history")<>"" then
sql="SELECT top "&show&" ID,小图,分类,人气,出产地,影片名,主演,显示,加入时间 FROM 影片 where id in("&Request.Cookies(site_Cookies)("view_history")&") order by 显示 desc"
else
sql="SELECT top "&show&" ID,小图,分类,人气,出产地,影片名,主演,显示,加入时间 FROM 影片 where 显示='是' order by 人气 desc"
end if
rs.Open sql,conn,1,1
if not rs.eof then
if rs.recordcount>show then
forci=show
else
forci=rs.recordcount
end if
for i=1 to forci
%>
<td align=middle>
<%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=116 height=72 border=0 class=pic2><br>"&rs("影片名")&"</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=116 height=72 border=0 class=pic2><br>"&rs("影片名")&"</a>"
end if%>
</td>
<%rs.movenext
next
else
Session("view_history")=""
Rw "暂无"
end if
%>
</tr>
</tbody>
</table>
</div>
</td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -