⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 index.asp

📁 千年免费电影系统 V3.1版 修正了V3.0版后台无法登陆的问题
💻 ASP
字号:
🔍 
<!--#include file="articleconn.asp"-->
<HTML><HEAD>
<meta http-equiv="Content-Language" content="en-gb">
<%set rs=conn.execute("select * from [home]")%>
<title><%=rs("home")%></title>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="img/style.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1505" name=GENERATOR>
<script language="JavaScript">
<!--
function checkinput()
{
if (document.search.keyword.value=="")
 {
alert("请输入想查询的内容！");
document.search.keyword.focus();
return false;
 }
 return true;
}
-->
</script>
<script language="javascript">kstatus();function kstatus(){self.status="<%=rs("Description")%>";setTimeout("kstatus()",0);}</script>
<style type="text/css">
<!--
.style1 {color: #FFFFFF}
.style3 {
	font-family: "宋体";
	font-size: 12px;
}
-->
</style>
</HEAD>
<BODY >
<!--#include file=top.asp-->
<TABLE cellSpacing=0 cellPadding=0 width=993 border=0>
<TBODY>
<TR>
<TD bgColor=#7d7d7d height=1></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=993 border=0>
<TBODY>
<TR>
<TD bgColor=#ffffff height=2></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=993 bgColor=#ffffff border=0>
<TBODY>
<TR>
<TD vAlign=top align=middle>
<TABLE cellSpacing=0 cellPadding=0 width=977 border=0>
<TBODY>
<TR>
<TD background=img/2.gif height=8></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=1 cellPadding=0 width=977 bgColor=#b7b7b7 border=0>
<TBODY>
<TR>
<TD bgColor=#ffffff>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD>
<TABLE height=94 cellSpacing=0 cellPadding=1 width="100%" border=0>
<TBODY>
<TR>
<TD align=right width=189><IMG height=90 src="img/channel_title_movie.gif" width=188></TD>
<TD>
<OBJECT codeBase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0 height=90 width=780 classid=clsid:D27CDB6E-AE6D-11cf-96B8-444553540000>
<PARAM NAME="movie" VALUE="img/banner_780x90.swf">
<PARAM NAME="quality" VALUE="High">
 
<embed src="img/banner_780x90.swf" quality="High" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="780" height="90"></embed></OBJECT></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD background=img/1.jpg height=12></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=977 border=0>
<TBODY>
<TR>
<TD height=2></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=993 bgColor=#ffffff border=0>
<TBODY>
<TR>
<TD vAlign=top align=middle height=173>
<TABLE height=36 cellSpacing=0 cellPadding=0 width=977 border=0>
<TBODY>
<TR>
<TD vAlign=top width=191 height=25>
<!--#include file=left.asp--></TD>
<TD width=2 valign="top"></TD>
<TD width=1 bgColor=#c6c6c6 valign="top"></TD>
<TD vAlign=top width=783>
<TABLE cellSpacing=0 cellPadding=0 width=783 border=0>
<TBODY>
<TR>
<TD><A href="/bfqxz/RealPlayer.exe"><IMG height=60 src="img/dl_01.jpg" width=179 border=0></A></TD>
<TD><A href="/bfqxz/Windows Media Player.exe"><IMG height=60 src="img/dl_02.jpg" width=171 border=0></A></TD>
<TD><A href="/bfqxz/ffdshow.exe"><IMG height=60 src="img/dl_03.jpg" width=168 border=0></A></TD>
<TD><A href="/bfqxz/ie6setup.exe"><IMG height=60 src="img/dl_04.jpg" width=160 border=0></A></TD>
<TD><A href="help/help.asp"><IMG height=60 src="img/dl_05.jpg" width=105 border=0></A></TD></TR></TBODY></TABLE>
<TABLE height=40 cellSpacing=0 cellPadding=0 width="100%" background=img/5.gif border=0>
<TBODY>
<TR>
<TD width=116 valign="top"><img border="0" src="img/18.gif" width="116" height="32"></TD>
<TD align=right><TABLE height=24 cellSpacing=0 cellPadding=0 border=0>
<TBODY>
<TR>
<TD align=middle width=70 
background=img/sub_bg.gif><a target="_blank" href="maindalu.asp">大陆剧场</a></TD>
<TD width=2><img src height=1 width=2></TD>
<TD align=middle width=70 
background=img/sub_bg.gif><a target="_blank" href="mainoumei.asp">欧美剧场</a></TD>
<TD width=2><img src height=1 width=2></TD>
<TD align=middle width=70 
background=img/sub_bg.gif><a target="_blank" href="maingangtai.asp">港台剧场</a></TD>
<TD width=2><img src height=1 width=2></TD>
<TD align=middle width=70 
background=img/sub_bg.gif><a target="_blank" href="mainrihan.asp">日韩剧场</a></TD>
<TD align=middle width=70 
background=img/sub_bg.gif><a target="_blank" href="mainqita.asp">其他影片</a></TD>
<TD width=2><img src height=1 width=2></TD>
</TR></TBODY></TABLE></TD>
<TD align=right valign="top"><IMG height=31 src="img/7.gif" width=83></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0><TBODY><TR align=right>
<TD>
<TABLE height=240 cellSpacing=0 cellPadding=0 width="100%" border=0 id="table1"><TBODY>
<TR align=right>
<TD>
<table width="126" border="0" cellpadding="0" cellspacing="0">
<tr> <%
sql="select articleid,domurl,title,hits,content from learning where firstbest=1 and typeid<>'搞笑片段' 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><div align="center">
<table width="126" border="0" cellspacing="0" cellpadding="0">
<tr height="119" align="center">
<td width="3"><!--Blank--></td>
<td width="123" background="images/commend_pic.gif"><table border="1" width="100%" cellpadding="0" style="border-collapse: collapse" bordercolor="#939393" id="table5">
<tr>
<td><table border="0" cellspacing="4" width="100%" cellpadding="0" id="table5">
<tr>
<td><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="137" height="191"></a></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr height="21" align="middle">
<td width="5"><img src height=1 width=9></td>
<td background="img/8.gif"><table border="0" cellspacing="0" width="90%" cellpadding="0">
								<tr>
									<td height="22" width=109 align="center">
									<% if row_count mod 1 =0 then%>
                              <%content=rs("title")
                            if len(content)>11 then content=left(content,11)&"?-"
                          response.write content
                            %> 
</td>
<td>
									<p align="center"><a href="movie.asp?id=<%=rs("articleid")%>" target="_blank">
									<img src="img/sort_play1.gif" width="18" height="18" border="0" alt="播放"></a></td>
								</tr>
							</table></td>
</tr>
</table>
</div></td>
<%end if%>
<%row_count=row_count+1
if b>=5 then exit do
rs.movenext
loop
rs.close
set rs=nothing

%>
</tr>
</table>
</TD>
</TR></TBODY></TABLE>



</TD>
</TR></TBODY></TABLE>
<TABLE height=40 cellSpacing=0 cellPadding=0 width="100%" background=img/5.gif border=0>
<TBODY>
<TR vAlign=top>
<TD width=146><img border="0" src="img/6.gif" width="116" height="32"></TD>
<TD align=right width="73%">
<table border="0" cellspacing="0" width="100%" cellpadding="0" id="table6">
	<tr>
		<td height="9"><img src height=9 width=1></td>
	</tr>
	<tr>
		<td>
		<table border="0" cellpadding="0" cellspacing="0" width="100%" id="table10">
			<tr>
				<td><!--webbotbot="HTMLMarkup" startspan -->
				<font color="#000000"><b><span class="样式3" 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 class="样式3">部</span>&nbsp; <span class="样式3">今天更新:</span><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></b><b>部</b></span>
&nbsp;<b>当前在线人数:</b><font color="#FF0000"><b><script src="http://www.1000n.com/tongji/count.asp?style=2"></script></b></font>
<!--webbot bot="HTMLMarkup" endspan --></td>
			</tr>
		</table>
</td>
	</tr>
</table>
　</TD>
<TD align=right width="95"><IMG height=31 src="img/7.gif" width=83></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0><TBODY>
<%  
dim t  
t=0  
sql="select articleid,title,domurl,typeid,dateandtime,best from learning where typeid<>'搞笑片段' order by articleid desc"  
set rs=server.createobject("adodb.recordset")  
rs.open sql,conn,1,1
for i=1 to 2
%>
<TR align=right>
<%
for j=1 to 5  
if not rs.eof then  
%>
<td height="240" align="center"><div align="right">
  <table width="126" border="0" cellspacing="0" cellpadding="0">
<tr height="119" align="center">
<td width="3"><!--Blank--></td>
<td width="123" background="images/commend_pic.gif"><table border="1" width="100%" cellpadding="0" style="border-collapse: collapse" bordercolor="#939393" id="table5">
<tr>
<td><table border="0" cellspacing="4" width="100%" cellpadding="0" id="table5">
<tr>
<td><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="137" height="191"></a></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr height="21" align="middle">
<td width="5"><img src height=1 width=9></td>
<td background="img/8.gif"><table border="0" cellspacing="0" width="90%" cellpadding="0">
								<tr>
									<td height="22" width=109 align="center">
									<% if row_count mod 1 =0 then%>
                              <%content=rs("title")
                            if len(content)>11 then content=left(content,11)&"?-"
                          response.write content
                            %> 
</td>
<td>
									<p align="center"><a href="movie.asp?id=<%=rs("articleid")%>" target="_blank">
									<img src="img/sort_play1.gif" width="18" height="18" border="0" alt="播放"></a></td>
								</tr>
							</table></td>
</tr>
</table>
</div></td>
<%end if%>
<%row_count=row_count+1
rs.movenext
end if
next
%>
</TR>
<%
next
rs.close
set rs=nothing

%>
</TBODY></TABLE>
<TABLE height=40 cellSpacing=0 cellPadding=0 width="100%" background=img/5.gif border=0>
<TBODY>
<TR>
<TD width=146 valign="top"><img border="0" src="img/13.gif" width="116" height="32"></TD>
<TD align=right>

<TABLE height=24 cellSpacing=0 cellPadding=0 border=0 id="table9">
<TBODY>
<TR>
<TD align=middle width=50 
background=img/sub_bg1.gif><a target="main" href="main.asp?Hits_Page=1">1页</a></TD>
<TD width=2><img src height=1 width=2></TD>
<TD align=middle width=50 
background=img/sub_bg1.gif><a target="main" href="main.asp?Hits_Page=2">2页</a></TD>
<TD width=2><img src height=1 width=2></TD>
<TD align=middle width=50 
background=img/sub_bg1.gif><a target="main" href="main.asp?Hits_Page=3">3页</a></TD>
<TD width=2><img src height=1 width=2></TD>
<TD align=middle width=50 
background=img/sub_bg1.gif><a target="main" href="main.asp?Hits_Page=4">4页</a></TD>
<TD width=2><img src height=1 width=2></TD>
<TD align=middle width=50 
background=img/sub_bg1.gif><a target="main" href="main.asp?Hits_Page=5">5页</a></TD>
<TD width=2><img src height=1 width=2></TD>
<TD align=middle width=50 
background=img/sub_bg1.gif><a target="main" href="main.asp?Hits_Page=6">6页</a></TD>
<TD width=2><img src height=1 width=2></TD>
<TD align=middle width=50 
background=img/sub_bg1.gif><a target="main" href="main.asp?Hits_Page=7">7页</a></TD>
<TD width=2><img src height=1 width=2></TD>
</TR></TBODY></TABLE>

</TD>
<TD align=right width="158" valign="top"><IMG height=31 src="img/7.gif" width=83></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0><TBODY>
<TR align=right>
<td>
<table border="0" cellpadding="0" width="100%" cellspacing="0" id="table8">
	<tr>
		<td align="center" height="8"></td>
	</tr>
	<tr>
		<td>
		<p align="right">
		<iframe name="main" width="774" frameborder=0 src="main.asp" id="web" height=500 scrolling="no" align="top" ></iframe>
		</td>
	</tr>
	<tr>
		<td align="center"></td>
	</tr>
</table>
</td>
</TR></TBODY></TABLE>
</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<!--#include file=bottom.asp-->
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -