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

📄 movie.asp

📁 1.可以批量添加电影
💻 ASP
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!--#include file="articleconn.asp"-->
<!--#include file="ip.asp"-->
<!--#include file=top.asp-->
<%
articleid=request("id")
if isnumeric(articleid)=false then
response.redirect "error.asp"
end if
   %>
<%
   dim sql
   dim rs
   articleid=request("id")
   set rs=server.createobject("adodb.recordset")
   sql="update learning set hits=hits+55 where articleID="&articleid
   rs.open sql,conn,1,3
   sql="select * from learning where articleid="&articleid
   rs.open sql,conn,1,1
   title=rs("title")
   ittype=rs("typeid")

 %>
<HTML><HEAD><TITLE>在线观看《<%=title%>》----青苑在线影院</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK 
href="css/STYLE1.css" type=text/css rel=stylesheet>
<SCRIPT language=javascript>
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
  mediaWindow = window.open(theURL,winName,features);
  mediaWindow.focus();
}
//-->
</SCRIPT>
<SCRIPT language=JavaScript><!-- 
if (top.location != location) top.location.href = location.href;
self.moveTo(0,0);
self.resizeTo(screen.availWidth,screen.availHeight);
// --></SCRIPT>
<SCRIPT language=JavaScript1.2> 
<!-- 
function Show(divid) { 
divid.filters.revealTrans.apply(); 
divid.style.visibility = "visible"; 
divid.filters.revealTrans.play(); 
} 
function Hide(divid) { 
divid.filters.revealTrans.apply(); 
divid.style.visibility = "hidden"; 
divid.filters.revealTrans.play(); 
} 
//--> 
</SCRIPT>
<script>
function OpenWindow(htmurl,widths,heights)
{
   var paramet = 'toolbar=no,resizable=no,scrollbars=no,width='+ widths + ',height=' + heights;
   newWindow = window.open(htmurl,"yule21",paramet);
   newWindow.focus();
}
</script>
 <script>
IEver=navigator.appVersion.substring(navigator.appVersion.indexOf('MSIE')+5,navigator.appVersion.indexOf(';',17));
if(IEver=="6.0")
    {
      ie6 = true;
      width_add = 10; 
      height_add = 29;
      hand_add = -14;
    }
else
    {
      ie6 = false;
      width_add = 10;
      height_add = 29;
      hand_add = 14;
    }
function OpenWindow(PlayerURL)
{
  if (ie6)
	newwindow=window.open('','','fullscreen=0,toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=-1');
  else
	newwindow=window.open('','','fullscreen=0,toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=-1');
	newwindow.moveTo(100,100);
	newwindow.resizeTo(440+width_add,428+height_add+hand_add);
	newwindow.focus();
	newwindow.location=PlayerURL;
}
function play(id)
{
    OpenWindow('freeplay.asp?id1='+id);
}

</script>
<script language="javascript">kstatus();function kstatus(){self.status="欢迎来到青苑在线影院系统,最便宜的电影网,请牢记本站域名http://www.gq160.com";setTimeout("kstatus()",0);}</script>
<SCRIPT language=JavaScript><!-- 
if (top.location != location) top.location.href = location.href;
self.moveTo(0,0);
self.resizeTo(screen.availWidth,screen.availHeight);
// --></SCRIPT>
<SCRIPT language=JavaScript1.2> 
<!-- 
function Show(divid) { 
divid.filters.revealTrans.apply(); 
divid.style.visibility = "visible"; 
divid.filters.revealTrans.play(); 
} 
function Hide(divid) { 
divid.filters.revealTrans.apply(); 
divid.style.visibility = "hidden"; 
divid.filters.revealTrans.play(); 
} 
//--> 
</SCRIPT>
<script>
function OpenWindow(htmurl,widths,heights)
{
   var paramet = 'toolbar=no,resizable=no,scrollbars=no,width='+ widths + ',height=' + heights;
   newWindow = window.open(htmurl,"yule21",paramet);
   newWindow.focus();
}
</script>
 <script>
IEver=navigator.appVersion.substring(navigator.appVersion.indexOf('MSIE')+5,navigator.appVersion.indexOf(';',17));
if(IEver=="6.0")
    {
      ie6 = true;
      width_add = 10; 
      height_add = 29;
      hand_add = -14;
    }
else
    {
      ie6 = false;
      width_add = 10;
      height_add = 29;
      hand_add = 14;
    }
function OpenWindow(PlayerURL)
{
  if (ie6)
	newwindow=window.open('','','fullscreen=0,toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=-1');
  else
	newwindow=window.open('','','fullscreen=0,toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=-1');
	newwindow.moveTo(100,100);
	newwindow.resizeTo(440+width_add,428+height_add+hand_add);
	newwindow.focus();
	newwindow.location=PlayerURL;
}
function play(id)
{
    OpenWindow('freeplay.asp?id1='+id);
}

</script>
<META content="Microsoft FrontPage 4.0" name=GENERATOR></HEAD>
<BODY oncontextmenu="return false" onselectstart="return false" 
ondragstart="return false" bgcolor=#0F0DAE leftMargin=5 topMargin=5 
marginheight="0" marginwidth="0">

<TABLE width=778 align=center border=2 style="border-collapse: collapse" bgcolor="#FCE9EE" cellpadding="0" cellspacing="0">
  <TBODY>
  <TR>
      <TD height=30  background=images/bb_title_bg.gif>&nbsp;&nbsp;&nbsp;&nbsp;
   <FONT color=#ffffff><b> 您现在的位置:<a href="index.asp"><FONT color=#ffffff>青苑影院首页</a>->在线电影-><a href=mlist.asp?typeid=<%=ittype%>><FONT color=#ffffff><%=ittype%></a>:<%=title%></b>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<script src=../mycount/online.asp></script> </TD>
  </TR>
  <TR>
    <TD vAlign=top><br>
<TABLE width="95%" align=center border=0>
              <TBODY>

  <TR>
      <TD align=left height=27>
      <p align="center"><FONT 
                  color=#0000ff><b><%=ittype%>:<%=title%></b></FONT></TD>
  </TR>
              <TR>
                <TD vAlign=top align=middle width="65%">
                  <TABLE cellSpacing=0 cellPadding=2 width="95%" 
                  borderColorLight=#000000 border=0>
                    <TBODY>
                    <TR>
                      <TD>影视名称: </TD>
                      <TD><FONT color=#ff0000><b><%=rs("title2")%></b></TD></TR>
                    <TR>
                      <TD vAlign=top width=80>类  型:</TD>
                      <TD><%=ittype%></TD></TR>
                    <TR>
                      <TD vAlign=top width=80>主  演:</TD>
                      <TD><%content=rs("name")
                          if len(content)>30 then content=left(content,30)&"…"
                          response.write content
                            %> </TD></TR>
                     <TR> 
                  <TD>格  式:</TD><TD><% if rs("movietype")="rm" then%>
                        <img src="IMG/real.gif" border="0"> 
                        <%elseif rs("movietype")="md" then%>
                        <img src="IMG/media.gif" border="0"> 
                        <%elseif rs("movietype")="mov" then%>
                        <img src="IMG/lookmov.gif" border="0"> 
                        <%end if%>
                      </TD>
                </TR>

                   <TD vAlign=top width=80>带宽要求:</TD>
                      <TD>450Kbps </TD></TR>

                      <TD vAlign=top width=80>加入时间:</TD>
                      <TD><%=rs("dateandtime")%>&nbsp;</TD></TR>
                    <TR>
                      <TD vAlign=top width=80>观看次数:</TD>
                      <TD><%=rs("hits")%>次&nbsp;</TD></TR>
                    <TR>
                      <TD vAlign=top width=80>推荐程度:</TD>
                      <TD><SPAN class=xinxin><img border="0" src="img/<%=rs("softlevel")%>STAR.GIF"></SPAN></TD></TR>
                    <TR>
                      <TD vAlign=top width=80>点播每集:</TD>
                      <TD>需要 <img border=0 src=img/<%=rs("count")%>.gif> 影币 
                    </TD></TR>
                    <TR> 
                  <TD>报告/发表:</TD>
                      <TD><input type="button" name="Submit2" value="报告该片有错误" class="button1" onClick="window.open('sendeoff.asp?title=<%=title%>','film','scrollbars=no,resizable=no,width=460,height=380,menubar=no,top=168,left=168')" style=" font-size:10pt;color:#000000">&nbsp;<input type="button" name="Submit2" value="发表评论" class="button1" onClick="window.open('fbpl.asp?id=<%=rs("articleid")%>')" style=" font-size:10pt;color:#000000">
                      </TD>
                </TR>

                    <TR>
                      <TD vAlign=top width=80>本站帮助:</TD>
                      <TD><A 
                  href="downhelp.asp" target=_blank><FONT 
                  color=#0000ff>下载帮助</FONT></A> &nbsp;&nbsp;&nbsp;<A                                                                                                 
                  href="playhelp.asp" target=_blank><FONT 
                  color=#0000ff>播放帮助</FONT></A> &nbsp;&nbsp;&nbsp;<A                                                                                                 
                  href="cesu.asp" target=_blank><FONT 
                  color=#0000ff>测试网速</FONT></A>
                 </TR>
                    </TBODY></TABLE></TD>   
                <TD vAlign=top align=middle width=238>
                  <TABLE cellSpacing=0 cellPadding=0 width=240 background="images/detail_28.jpg">
                    <TBODY>
                    <tr> 
                      <td height="10"></td>
                    </tr> 

                <tr>
                  <td align=center><img src="<%if rs("domurl")="" then%>img/w.gif<%else%><%=rs("domurl")%><%end if%>" border=1 width="200" height="200" align=center></td>
                </tr>
                    <tr> 
                      <td height="10"></td>
                    </tr>

                    <TR>
                      <TD align=middle>《<%=title%>》剧照
                     </TD>
                    </TR>
                    </TBODY></TABLE>
                     <TABLE cellSpacing=0 cellPadding=0 width=165 border=0>
                    <TBODY>
</TBODY></TABLE> 
          </TD></TR></TBODY></TABLE><BR></TD></TR>
        <TR>
          <TD>
            <TABLE cellSpacing=10 cellPadding=0 width="96%" align=center 
            borderColorLight=#000000 border=0>
              <TBODY>
              <TR>
                <TD vAlign=top align=middle width=80>播放电影: </TD>
                <TD><%
                  
sql="select * from movieurl where nameid='"&articleid&"'"
set rsurl=server.createobject("adodb.recordset")
if rs("onlinelook")=1 then
rsurl.open sql,conn,1,1
if rsurl.eof then
response.write "暂停该影片的在线播放,想看该片的朋友稍后或下载后再观看!"
else
no=rsurl.recordcount
do while not rsurl.eof
for c=1 to no
if len(c)=1 then
response.write "<a class='real' href=""javascript:play('"&rsurl("id")&"&id2="&articleid&"')"">&nbsp;第0"&c&"集&nbsp;</a>"
else
response.write "<a class='real' href=""javascript:play('"&rsurl("id")&"&id2="&articleid&"')"">&nbsp;第"&c&"集&nbsp;</a>"
if c mod 14=0 then
response.write "<br>"
end if
end if
rsurl.movenext
if rsurl.eof then exit do
next
loop
end if
rsurl.close
else
response.write "暂停该影片的在线播放,想看该片的朋友稍后或下载后再观看!"
end if%></TD></TR>
<tr>
                <TD vAlign=top align=middle width=80>下载电影:</TD>  
                <TD><%
sql="select * from movieurl where nameid='"&articleid&"'"
set rsurl=server.createobject("adodb.recordset")
if rs("down")=1 then                               
rsurl.open sql,conn,1,1
if rsurl.eof then
response.write""
else
no=rsurl.recordcount
do while not rsurl.eof
for c=1 to no
if len(c)=1 then
response.write"<a class='real' href=""javascript:OpenWindow('down.asp?id1="&rsurl("id")&"&id2="&articleid&"',460,406);"">&nbsp;&nbsp;"&c&"&nbsp;</a>"
else
response.write"<a class='real' href=""javascript:OpenWindow('down.asp?id1="&rsurl("id")&"&id2="&articleid&"',460,406);"">&nbsp;"&c&"&nbsp;</a>"
if c mod 30=0 then
response.write"<br>"
end if
end if
rsurl.movenext
if rsurl.eof then exit do
next
loop
end if
rsurl.close
else
response.write"系统提示:暂时不提供影片下载,请过两天再来吧!"
end if%></TD>
              </tr>
                      <TR>
                      <TD vAlign=top align=middle width=80><FONT 
                  color=#ff0000>友情提示:</TD>
<TD>本站全部影片来源与网络服务器,部分电影看不了或缓慢是正常的,我们会每天更新,让您每天都欣赏到最新颖的影片</TD></TR>
                    <TR>

</TBODY></TABLE></TD></TR>
  <TR>
      <TD height=30 background="images/2007.gif">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;◎ 
      <b><%=ittype%>《<%=title%>》故事梗概:</b></TD>
  </TR>



<TR>
                <TD>
            <TABLE cellSpacing=10 cellPadding=0 width="98%" align=center 
            borderColorLight=#000000 border=0>

                <TD>&nbsp;&nbsp;&nbsp;&nbsp;<%content=rs("content")
                          if len(content)>5000 then content=left(content,5000)&"……"
                          response.write content
                            %></TD></TR>
            </tr>
           </TBODY>
      </TABLE></TD></TR>
 </TR></TBODY></TABLE></TR>
 </TR></TBODY></TABLE></TR>
 </TR></TBODY></TABLE></TR>
 </TR></TBODY></TABLE>
</BODY></HTML>
<!--#include file=Bottom1.asp-->

⌨️ 快捷键说明

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