📄 class.asp
字号:
<!--#include file="articleconn.asp"-->
<!--#include file="head.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>蚂蚁影院</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK
href="css/style.css" type=text/css rel=stylesheet>
<SCRIPT>
//加入页面保护
function rf()
{return false; }
document.oncontextmenu = rf
function keydown()
{if(event.ctrlKey ==true || event.keyCode ==93 || event.shiftKey ==true){return false;} }
document.onkeydown =keydown
function drag()
{return false;}
document.ondragstart=drag
function stopmouse(e) {
if (navigator.appName == 'Netscape' && (e.which == 3 || e.which == 2))
return false;
else if
(navigator.appName == 'Microsoft Internet Explorer' && (event.button == 2 || event.button == 3)) {
return false;
}
return true;
}
document.onmousedown=stopmouse;
if (document.layers)
window.captureEvents(Event.MOUSEDOWN);
window.onmousedown=stopmouse;
</SCRIPT>
<%
MaxPerPage=10
dim totalPut
dim CurrentPage
dim TotalPages
dim i
dim ty
typeid=Replace(request("typeid"), "'", "''")
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
dim rstype
dim typesql
dim types
if not isEmpty(Replace(request("typeid"), "'", "''")) then
typeid=Replace(request("typeid"), "'", "''")
else
typeid="全部"
end if
%>
<table width="778" height="2" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#B4D541">
<tr>
<td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
</table>
<TABLE cellSpacing=0 cellPadding=0 width=778 align=center border=0>
<TR>
<TD vAlign=top align=middle width=162 bgColor=#EEFFAD>
<TABLE width=162 border=0 cellPadding=0 cellSpacing=0 bgcolor="#FFFFFF">
<TR>
<TD bgcolor="#FFFFFF"><img border="0" src="pic/denglu.gif" width="162" height="29"></TD>
</TR>
<TR>
<TD>
<!--#include file=userlogin.asp-->
</TD>
</TR>
</TABLE>
<TABLE width=162 border=0 cellPadding=0 cellSpacing=0 bgcolor="#FFFFFF" background="pic/bj.gif">
<TR>
<TD>
<img border="0" src="pic/fuwu.gif" width="162" height="29"></TD>
</TR>
<TR>
<TD><TABLE width="90%" border=0 align="center" cellPadding=0 cellSpacing=0>
<TR align=center>
<TD width="50%" height=16><a href="#" onclick="window.open('lookday01.asp','newdows','width=400,height=350,left=100,top=50,scrollbars=yes')" class="left">
<font color="#000000">查询点数</font></a></TD>
<TD width="50%" height=16><a href="#" onclick="window.open('lookday.asp','newdows','width=400,height=350,left=100,top=50,scrollbars=yes')" class="left">
<font color="#000000">查询天数</font></a>
</TD>
</TR>
<TR align=center>
<TD width="50%" height=16><a href="exitpwd.asp" class="left">
<font color="#000000">取回密码</font></a></TD>
<TD width="50%" height=16><a href="chageusr.asp" class="left">
<font color="#000000">修改资料</font></a></TD>
</TR>
<TR align=center>
<TD width="50%" height=16>
<a target="_blank" href="USER/buy.asp" class="left">
<font color="#000000">用户续费</font></a></TD>
<TD width="50%" height=16><a href="xfjl.asp" class="left">
<font color="#000000">消费记录</font></a></TD>
</TR>
<TR align=center>
<TD width="50%" height=16><a target="_blank" href="http://bbs.cn-mayi.com" class="left">
<font color="#000000">电影论坛</font></font></a></TD>
<TD width="50%" height=16><a href="czpt.asp" class="left">
<font color="#000000">充值平台</font></a></TD>
</TR>
</TABLE></TD>
</TR>
</TABLE>
<TABLE width=162 border=0 cellPadding=0 cellSpacing=0 bgcolor="#C3EF29">
<form name="form2" method="post" action="search.asp" onsubmit="if (!checkinput()) return false;">
<script language="JavaScript">
<!--
function checkinput()
{
if (document.form2.keyword.value=="")
{
alert("请输入想查询的内容！");
document.form2.keyword.focus();
return false;
}
return true;
}
-->
</script>
<TR>
<TD height="24">
<img border="0" src="pic/leftsearch.gif" width="162" height="29"></TD>
</TR>
<TR>
<TD align=middle>
<table width="100%" border="0" cellspacing="0" cellpadding="0" background="pic/bj.gif">
<tr>
<td align="right">选择类型：</td>
<td><font color="#FFFFFF">
<select name="typeid" size="1" class="button1" id="typeid" style="color: #000000; border: 1px outset #000000; background-color: #FFFFFF">
<option value="片名">+电影名称+</option>
<option value="演员">+演员名称+</option>
</select>
</font></td>
</tr>
<tr>
<td align="right">关 键 字：</td>
<td><font color="#FFFFFF">
<input name=keyword class="button2" onFocus="javascript:this.select();" value="" size="11" style="color: #990000; border: 1px outset #000000; background-color: #FFFFFF">
</font></td>
</tr>
<tr align="center">
<td colspan="2"> <font color="#FFFFFF">
<input name="I1" type="submit" class="button1" value="影片搜索" onClick="if (search.keyword.value.length==0) {alert('请输入关键字！');return false;}" style="color: #000000; border: 1px outset #000000; background-color: #FFFFFF" >
</font></td>
</tr>
</table></TD>
</TR>
</FORM>
</TABLE>
<TABLE width=162 border=0 cellPadding=0 cellSpacing=0 bgcolor="#EEFFAD">
<TR>
<TD><IMG height=29 src="pic/movie_gengxin.gif" width=162></TD>
</TR>
<TR>
<TD align="center">
<table border="0" cellpadding="0" style="border-collapse: collapse" width="100%" id="AutoNumber6" background="pic/bj.gif">
<%
dim t
t=0
sql="select articleid,title,typeid,dateandtime,best from learning order by articleid desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
do while not rs.eof
t=t+1
%>
<tr>
<td width="60%" height="18" bgcolor="#FFFFFF" style="border-left-style: solid; border-left-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px"> <a href="movie.asp?id=<%=rs("articleid")%>" target="_blank" class="left"><font color="#000000"><%content=rs("title")
if len(content)>6 then content=left(content,6)&"…"
response.write content
%></font></a>
</td>
<td width="40%" bgcolor="#FFFFFF" style="border-right-style: solid; border-right-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px"><%=rs("dateandtime")%></td>
</tr>
<%
if t>=10 then exit do
rs.movenext
loop
%>
</table></TD>
</TR>
</TABLE> <TABLE width=162 border=0 cellPadding=0 cellSpacing=0 bgcolor="#EEFFAD">
<TR>
<TD><IMG height=29 src="pic/movie_paihang.gif" width=162></TD>
</TR>
<TR>
<TD align="center">
<table border="0" cellpadding="0" cellspacing="0" width="100%" background="pic/bj.gif">
<%
Set rst= Server.CreateObject("ADODB.Recordset")
rst.open "select articleid,title,hits from learning order by hits desc",conn,1,1
%>
<%
i=0
do while not rst.eof
i=i+1
%>
<tr>
<td width="112" height="18" bgcolor="#FFFFFF" style="border-left-style: solid; border-left-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px"> <a href="movie.asp?id=<%=rst("articleid")%>" target="_blank" class="left"><font color="#000000"><%content=rst("title")
if len(content)>7 then content=left(content,7)&"…"
response.write content
%></font></a></td>
<td width="30" bgcolor="#FFFFFF" style="border-right-style: solid; border-right-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px"><%=rst("hits")%> </td>
</tr>
<%
if i>=10 then exit do
rst.movenext
loop
rst.close
set rst=nothing
%>
</table></TD>
</TR>
</TABLE> <TABLE width=162 border=0 cellPadding=0 cellSpacing=0 bgcolor="#EEFFAD">
<TR>
<TD><IMG height=29 src="pic/movie_software.gif" width=162></TD>
</TR>
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0 bgcolor="#FFFFFF" height="80" background="pic/bj.gif">
<TR>
<TD align=center height="42">
<a target="_blank" href="http://vod.my0816.com/vodb/software/realoneplayer.rar"><img src="images/realone.gif"
width=88 height=31 border="0"></a></TD>
</TR>
<TR>
<TD align=center><a href="/Downloads/fg140.exe" target="_blank"><img src="images/flashget.gif" width="88" height="31" border="0"></a></TD>
</TR>
</TABLE></TD>
</TR>
</TABLE>
</TD>
<TD align=middle vAlign=top bgcolor="#FFFFFF">
<table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/inchelp-04.gif" height="45">
<tr>
<td width="35" bgcolor="#CCCCCC"> </td>
<td bgcolor="#CCCCCC">
<marquee class= behavior=scoll width=175 scrollDelay=2 scrollAmount=1 onmouseover=this.stop(); onmouseout=this.start();> <script src="vod2/jstopgd.asp" ></script></marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</marquee>
</td>
<td width="17" bgcolor="#CCCCCC"> </td>
<td width="74" align="center" bgcolor="#0066CC" >
<font color="#FFFFFF">付费帮助</font></td>
<td width="6" bgcolor="#CCCCCC"> </td>
<td width="74" align="center" bgcolor="#660066" >
<font color="#FFFFFF">播放帮助</font></td>
<td width="6" bgcolor="#CCCCCC"> </td>
<td width="73" align="center" bgcolor="#666633" >
<font color="#FFFFFF">下载帮助</font></td>
<td width="9" bgcolor="#CCCCCC"> </td>
<td width="68" align="center" bgcolor="#003366" > <a class="left" target="_blank" href="../bbs">
<font color="#FFFFFF">本站论坛</font></a></td>
<td width="14" bgcolor="#CCCCCC"> </td>
<td width="65" align="center" bgcolor="#000099" >
<font color="#FFFFFF">注册会员</font></td>
<td width="4" bgcolor="#CCCCCC" rowspan="2"> </td>
</tr>
<tr>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -