📄 index.asp
字号:
<!--#include file=articleconn.asp-->
<!--#include file=top.asp-->
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="778" id="AutoNumber4">
<tr>
<td width="828" background="images/index-bg1.gif" colspan="2">
<img border="0" src="images/index-line1.gif" width="263" height="6"></td>
</tr>
<tr>
<td width="263" valign="top">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber5">
<tr>
<td width="100%">
<img border="0" src="images/index-title1.gif" width="263" height="45"></td>
</tr>
<tr>
<td width="100%" background="images/index-bg2.jpg" height="206">
<div align="center">
<center>
<table border="0" cellpadding="4" cellspacing="4" style="border-collapse: collapse" bordercolor="#111111" width="85%" id="AutoNumber6">
<tr>
<td width="100%">
<marquee direction="up" height="163" onmouseout="this.start()" onmouseover="this.stop()" scrollAmount="1" scrollDelay="100" align="left">
<%set rs1=server.createobject("adodb.recordset")
sql="select * from talk where id=id"
rs1.open sql,conn,1,3
talk=rs1("talk")
rs1.close
set rs1=nothing
%><%=talk%></marquee>
</td>
</tr>
</table>
</center>
</div>
</td>
</tr>
</table>
</td>
<td width="565" valign="top">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber7">
<tr>
<td width="100%">
<img border="0" src="images/index-title2.gif" width="515" height="29"></td>
</tr>
<tr>
<td width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber8">
<tr>
<td>
<img border="0" src="images/index-left1.gif" width="18" height="159"></td>
<td><iframe frameborder=0 height=159 marginheight=0 marginwidth=0 name=movie scrolling=no src="newpic.asp" width=483></iframe></td>
<td align="right">
<img border="0" src="images/index-right1.gif" width="14" height="159"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="100%">
<img border="0" src="images/index-bottom1.gif" width="515" height="5"></td>
</tr>
<tr>
<td width="100%" bgcolor="#264589">
<img border="0" src="images/index-bg2.gif" width="1" height="9"></td>
</tr>
<tr>
<td width="100%" background="images/index-bg3.gif">
<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>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber9">
<tr>
<td>
<img border="0" src="images/index-left2.gif" width="27" height="34"></td>
<td><font color="#000000" class="fontshadow">影片搜索:</font></td>
<td>
<input type="radio" value="片名" checked name="typeid"></td>
<td>
<font color="#000000" class="fontshadow">按片名</font></td>
<td>
<input type="radio" value="演员" name="typeid"></td>
<td>
<font color="#000000" class="fontshadow">按影星</font></td>
<td>
<input type="text" name=keyword onFocus="javascript:this.select();" size="25" style="border: 1px solid #3655AA; font-size:9pt;color:#000000""></td>
<td>
<input type="image" src="images/index-sousuo.gif" value="影片搜索" onClick="if (search.keyword.value.length==0) {alert('请输入关键字!');return false;}" name="B1" width="67" height="34"></td>
<td align="right">
<img border="0" src="images/index-right2.gif" width="34" height="34"></td>
</tr>
</table>
</td></form>
</tr>
<tr>
<td width="100%" bgcolor="#264589">
<img border="0" src="images/index-bg4.gif" width="17" height="9"></td>
</tr>
<tr>
<td width="100%">
<img border="0" src="images/index-line2.gif" width="515" height="6"></td>
</tr>
</table>
</td>
</tr>
</table>
</center>
</div>
<div align="center">
<center>
<!--
Generator: http://w w w . 4 1 7 6 0 0 . n e t
Creation Data: 2004-11-29
Original Author: Qq7 5 1 4 6 Qq1 1 8 1 9 0
-->
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="778" id="AutoNumber12">
<tr>
<td width="263" valign="top">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber13">
<tr>
<td width="100%">
<img border="0" src="images/index-title3.gif" width="263" height="65"></td>
</tr>
<tr>
<td width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber14" background="images/index-bg5.gif" height="1" >
<tr>
<td width="33%" height="1">
<img border="0" src="images/index-left3.gif" width="18" height="232"></td>
<td height="1">
<table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="180" id="AutoNumber15" cellpadding="0">
<tr>
<td width="180">
<!--#include file=userlogin.asp-->
<!--webbot
bot="HTMLMarkup" startspan --><font color="#3399FF"><span lang="zh-cn">共有电影:</span>
<%
function gettipnum1()
dim tmprs1
tmprs1=conn.execute("Select Count(articleid) from learning")
gettipnum1=tmprs1(0)
set tmprs1=nothing
if isnull(gettipnum1) then gettipnum1=0
end function
%><font color="#FF0000"><%=gettipnum1()%></font>部今天更新:<span lang="zh-cn">
<%
function todays()
dim tmprs
tmprs=conn.execute("Select count(articleid) from learning Where year(dateandtime)=year(date()) and month(dateandtime)=month(date()) and day(dateandtime)=day(date())")
todays=tmprs(0)
set tmprs=nothing
if isnull(todays) then todays=0
end function%><font color="#FF0000"><%=todays()%></font>部</span>
<!--webbot bot="HTMLMarkup" endspan -->
</td>
</tr>
<tr>
<td align="center" width="180">
<table border="0" cellpadding="0" cellspacing="4" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber23">
<tr>
<td width="83" background="images/index-bottombg.gif" height="25" align="center">
<span class="fontshadow"><a class="a1" href="chagepwd.asp">修改密码</a></span></td>
<td> </td>
<td width="83" background="images/index-bottombg.gif" height="25" align="center">
<span class="fontshadow"><a class="a1" href="chageusr.asp">修改资料</a></span></td>
</tr>
<tr>
<td width="83" background="images/index-bottombg.gif" height="25" align="center">
<span class="fontshadow"><a class="a1" href="exitpwd.asp">取回密码</a></span></td>
<td> </td>
<td width="83" background="images/index-bottombg.gif" height="25" align="center">
<span class="fontshadow"><a class="a1" href="mylook.ASP">消费记录</a></span></td>
</tr>
<tr>
<td width="83" background="images/index-bottombg.gif" height="25" align="center">
<span class="fontshadow"><a class="a1" href="czpt.asp">充值平台</a></span></td>
<td> </td>
<td width="83" background="images/index-bottombg.gif" height="25" align="center">
<span class="fontshadow"><a class="a1" href="USER/buy.asp"target="_blank">升级续费</a></span></td>
</tr>
<tr>
<td width="83" background="images/index-bottombg.gif" height="25" align="center">
<span class="fontshadow"><a class="a1" href="http://www.9j455.com/vod1">激情电影</a></span></td>
<td> </td>
<td width="83" background="images/index-bottombg.gif" height="25" align="center">
<span class="fontshadow"><a class="a1" href="mailto:love86960373@hotmail.com"target="_blank">付费确认</a></span></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
<td width="34%" align="right">
<img border="0" src="images/index-right3.gif" width="26" height="232"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="100%">
<img border="0" src="images/index-bottom3.gif" width="263" height="34"></td>
</tr>
<tr>
<td width="100%" background="images/index-bg6.gif">
<img border="0" src="images/index-title4.gif" width="263" height="58"></td>
</tr>
<tr>
<td width="100%" background="images/index-bg6.gif">
<div align="center">
<center>
<table border="0" cellpadding="2" style="border-collapse: collapse" bordercolor="#111111" width="80%" id="AutoNumber16">
<%
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 align="center"><%=t%>.</td>
<td><a href="movie.asp?id=<%=rs("articleid")%>" target="_blank" class="left"><%content=rs("title")
if len(content)>13 then content=left(content,13)&"…"
response.write content
%></a>
</td>
<td align="center" width="18%"><%=Month(rs("dateandtime"))%>-<%=day(rs("dateandtime"))%></td>
</tr>
<tr>
<td colspan="3">
<img border="0" src="images/index-line3.gif" width="230" height="1" ></td>
</tr>
<%
if t>=13 then exit do
rs.movenext
loop
%>
</table>
</center>
</div>
</td>
</tr>
<tr>
<td width="100%" background="images/index-bg6.gif">
<img border="0" src="images/index-title6.gif" width="263" height="73"></td>
</tr>
<tr>
<td width="100%" background="images/index-bg6.gif">
<div align="center">
<center>
<table border="0" cellpadding="2" style="border-collapse: collapse" bordercolor="#111111" width="80%" id="AutoNumber16">
<%
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 align="center"><%=i%>.</td>
<td><a href="movie.asp?id=<%=rst("articleid")%>" target="_blank" class="left"><%content=rst("title")
if len(content)>12 then content=left(content,12)&"…"
response.write content
%></a>
</td>
<td align="center" width="16%"><%=rst("hits")%></td>
</tr>
<tr>
<td colspan="3">
<img border="0" src="images/index-line3.gif" width="230" height="1" ></td>
</tr>
<%
if i>=12 then exit do
rst.movenext
loop
rst.close
set rst=nothing
%>
</table>
</center>
</div>
</td>
</tr>
<tr>
<td width="100%" background="images/index-bg6.gif">
<img border="0" src="images/index-title5.gif" width="263" height="73"></td>
</tr>
<tr>
<td width="100%" background="images/index-bg6.gif" align="center" height="40">
<a href="down/realplay10.exe">
<img border="0" src="images/movie-xz-1.gif" width="88" height="31"></a>
<a href="down/mp9setup.exe">
<img border="0" src="images/movie-xz-3.gif" width="88" height="31"></a></td>
</tr>
<tr>
<td width="100%" background="images/index-bg6.gif" align="center" height="40">
<a href="down/down.exe">
<img border="0" src="images/movie-xz-4.gif" width="85" height="28"></a>
<a href="down/divx5.zip">
<img border="0" src="images/movie-xz-5.gif" width="88" height="31"></a></td>
</tr>
<tr>
<td width="100%" align=center background="images/index-bg6.gif"><br>
</td>
</tr>
<tr>
<td width="100%" background="images/index-bg6.gif"><br>
<br>
</td>
</tr>
<tr>
<td width="100%" background="images/index-bg6.gif">
<img border="0" src="images/index-bottom4.gif" width="62" height="26"></td>
</tr>
</table>
</td>
<td width="515" valign="top" bgcolor="#264589">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber17">
<tr>
<td width="100%" background="images/index-bg72.jpg" height="198" colspan="2">
<div align="center">
<center>
<table border="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111" width="95%" id="AutoNumber18" height="100%" cellspacing="4">
<tr>
<td width="33%" align="left">
<table border="0" style="border-collapse: collapse" bordercolor="#111111" width="30%" id="AutoNumber121" cellpadding="2">
<tr>
<%
sql="select articleid,domurl,title,hits,content from learning where firstbest=1 order by articleid desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
b=0
row_count=1
%> <%
do while not rs.eof
b=b+1%>
<td> </td>
<td align="center">
<a href="movie.asp?id=<%=rs("articleid")%>" target="_blank"><img border="0" src="<%if rs("domurl")="" then%>img/w.gif<%else%><%=rs("domurl")%><%end if%>" width="145" height="120"></a>
<% if row_count mod 1 =0 then%>
<a href="movie.asp?id=<%=rs("articleid")%>" target="_blank" class="left"><%content=rs("title")
if len(content)>11 then content=left(content,11)&"…"
response.write content
%></a>
<br><img border="0" src="images/index-line4.gif" width="145" height="1"></td>
<td> </td>
<%end if%>
<%row_count=row_count+1
if b>=3 then exit do
rs.movenext
loop
rs.close
set rs=nothing
%>
</tr>
</table>
</td>
</tr>
</table>
</center>
</div>
</td>
</tr>
<tr>
<td width="100%" bgcolor="#264589" colspan="2">
<img border="0" src="images/index-bg2.gif" width="1" height="9"></td>
</tr>
<tr>
<td width="100%" align="center" colspan="2">
<img border="0" src="images/ban1.gif" width="508" height="120"></td>
</tr>
<tr>
<td width="100%" bgcolor="#264589" colspan="2">
<img border="0" src="images/index-bg2.gif" width="1" height="9">
</td>
</tr>
<tr>
<div align="center">
<center>
<td width="50%" align="center">
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -