📄 mlist1.asp

📁 千年免费电影系统 V3.1版修正了V3.0版后台无法登陆的问题
💻 ASP
📖 第 1 页 / 共 2 页
字号:
12 下一页
<!--#include file=articleconn.asp-->
<%
   MaxPerPage=6
   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
%>

<HTML><HEAD>
<meta http-equiv="Content-Language" content="en-gb">
<%set rs=conn.execute("select * from [home]")%>
<TITLE>万众电影</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="../../vod/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></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=../../vod/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="../../vod/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="../../vod/img/banner_780x90.swf">
<PARAM NAME="quality" VALUE="High">
 
<embed src="../../vod/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=../../vod/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>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD><IMG height=26 src="../../vod/img/t1.jpg" width=191></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=10 width="100%" border=0>
<TBODY>
<TR>
<TD class=white-2 bgColor=#939393>
   <%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%>
</TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD><IMG height=28 src="../../vod/img/t2.jpg" width=191></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=10 width="100%" border=0>
<TBODY>
<TR>
<TD class=white-1 align=middle bgColor=#939393>
<table border="0" cellspacing="3" width="90%" id="table7">
	<tr>
		<td align="center" class=white-2><a href="/dljc.asp"> 大陆剧场</a></td>
		<td align="center" class=white-2><a href="/omjc.asp">  欧美剧场</a></td>
	</tr>
	<tr>
		<td align="center" class=white-2><a href="/gtjc.asp">  港台剧场</a></td>
		<td align="center" class=white-2><a href="/rhjc.asp">  日韩剧场</a></td>
	</tr>
</table>
</TD></TR></TBODY></TABLE>

<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD><IMG src="../../vod/img/t6.jpg"></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=10 width="100%" border=0>
<TBODY>
<TR>
<TD class=white-1 bgColor=#939393>            <%
                         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
                      %>
              <table><tr>
                <td width="5%" align="center">
				<img border="0" src="../../vod/img/2dian.gif" width="10" height="9"></td>
                <td width="64%"><a href="movie.asp?id=<%=rst("articleid")%>" target="_blank" class="left">
                  <%content=rst("title")
                            if len(content)>8 then content=left(content,8)&"..."
                          response.write content
                            %>
                </a> </td>
                <td align="center" width="22%"><%=rst("hits")%></td>
              </tr>
              </table>
              <% 
                        if i>=10 then exit do
                        rst.movenext
                        loop
                        rst.close
                        set rst=nothing
                        %></TD></TR></TBODY></TABLE>

<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY><TR><TD><IMG height=28 src="../../vod/img/t3.jpg" width=191></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=10 width="100%" border=0>
<TBODY><TR><TD class=white-1 bgColor=#939393><table width="159" border="0" cellspacing="0" cellpadding="0">
    <tr>
      <td width="45" align="right"><div align="right" class="style1">
		<font color="#FFFFFF">QQ:</font></div></td>
      <td width="105"><font color="#FFFFFF"><span class="style1">283356686</span></font></td>
    </tr>
    <tr>
      <td align="right"><font color="#FFFFFF"><span class="style1">E-mail:</span></font></td>
      <td><a href="mailto:succkey@163.com" class="style1">succkey@163.com</a></td>
    </tr>
  </table></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY><TR><TD><IMG height=28 src="../../vod/img/t4.jpg" width=191></TD></TR></TBODY></TABLE>



<TABLE cellSpacing=0 cellPadding=10 width="100%" border=0>
<TBODY>
<TR>
<TD valign="top" bgColor=#939393 class=white-1>
<IMG height=9 
hspace=5 src="../../vod/img/2dian.gif" width=10 align=absMiddle 
vspace=8>
 <a href="../../help/help1.asp"><font size="2"><span style="text-decoration: none">Rip播放软件的安装？</span></font></a><font size="2"><BR>
<IMG 
height=9 hspace=5 src="../../vod/img/2dian.gif" width=10 
align=absMiddle vspace=8> 
<A 
href="../../help/help2.asp"><span style="text-decoration: none">字幕相关介绍？</span></A><BR>
<IMG 
height=9 hspace=5 src="../../vod/img/2dian.gif" width=10 
align=absMiddle vspace=8>
<A 
href="../../help/help3.asp"><span style="text-decoration: none">VobSub字幕时间调整？</span></A><BR>
<IMG 
height=9 hspace=5 src="../../vod/img/2dian.gif" width=10 
align=absMiddle vspace=8>
<A 
href="../../help/help4.asp"><span style="text-decoration: none">Rip常见问题和方法？</span></A><BR>
<IMG 
height=9 hspace=5 src="../../vod/img/2dian.gif" width=10 
align=absMiddle vspace=8>
<A 
href="../../help/help5.asp"><span style="text-decoration: none">Rip播放和插件的设置？</span></A><BR>
<IMG 
height=9 hspace=5 src="../../vod/img/2dian.gif" width=10
align=absMiddle vspace=8>
	</font>
<A 
href="../../help/help6.asp"><span style="text-decoration: none">
	<font size="2">Rip播放的名词术语？</font></span></A><BR>
  </TD>
</TR>
</TBODY></TABLE>


<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY><TR><TD><IMG height=28 src="../../vod/img/t3.jpg" width=191></TD></TR></TBODY></TABLE>

<TABLE cellSpacing=0 cellPadding=5 width="100%" border=0>
<TBODY>
<TR>
<TD class=white-2 bgColor=#939393 height=181 valign="top"><div align="center">你对本站的哪方面最满意</div>
  <table width="120" border="0" align="center" cellpadding="0" cellspacing="0"> 
	<form action="../../yijian.asp" method="post" name="yijian">
      <tr>
        <td><input type="radio" name="manyi" value="playspeed"><font color="#FFFFFF"><span class="style1">电影的播放速度</span></font></td>
      </tr>
      <tr>
        <td><input name="manyi" type="radio" value="updatespeed"><font color="#FFFFFF"><span class="style1">电影的更新速度</span></font></td>
      </tr>
      <tr>
        <td><input name="manyi" type="radio" value="movies_amount">
            <font color="#FFFFFF">
            <span class="style1"> 电影的数量</span></font></td>
      </tr>
      <tr>
        <td><div align="center">
            <input type="submit" value="提 交">
        </div></td>
      </tr></form>
	 
    </table>　</TD></TR></TBODY></TABLE></TD>
<TD width=2></TD>
<TD width=1 bgColor=#c6c6c6></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="../../vod/img/dl_01.jpg" width=179 border=0></A></TD>
<TD><A href="/bfqxz/Windows Media Player.exe">
<IMG height=60 src="../../vod/img/dl_02.jpg" width=171 border=0></A></TD>
<TD><A href="/bfqxz/ffdshow.exe">
<IMG height=60 src="../../vod/img/dl_03.jpg" width=168 border=0></A></TD>
<TD><A href="/bfqxz/ie6setup.exe">
<IMG height=60 src="../../vod/img/dl_04.jpg" width=160 border=0></A></TD>
<TD><A href="#"><IMG height=60 src="../../vod/img/dl_05.jpg" width=105 border=0></A></TD></TR></TBODY></TABLE>
<TABLE height=40 cellSpacing=0 cellPadding=0 width="100%" background=../../vod/img/5.gif border=0>
<TBODY>
<TR vAlign=top>
<TD width=116>
<img border="0" src="../../vod/img/18.gif" width="116" height="32"></TD>
<TD align=right><IMG height=31 src="../../vod/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 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="../../vod/img/8.gif"><table border="0" cellspacing="0" width="90%" cellpadding="0">
								<tr>
									<td height="22" width=74 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="../../vod/img/sort_play.gif" width="60" height="18" border="0"></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=../../vod/img/5.gif border=0>
<TBODY>
<TR vAlign=top>
<TD width=146>
<img border="0" src="../../vod/img/11.gif" width="116" height="32"></TD>
12 下一页
💿 文件大小 1322 K
👤 上传用户 gqingwei
📂 所属分类 Internet/网络编程
🏷️ 相关标签

#3.1 #3.0 #千 #电影
⌨️ 快捷键说明

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