家庭/个人应用

开发平台：
ASP/ASPX

movie不点广告版.asp：源码内容
							<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!--#include file="articleconn.asp"-->
  
<HTML><HEAD><%set rs=conn.execute("select * from [home]")%>
<title><%=rs("homes")%></title>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK 
href="css/css.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('look.asp?id1='+id);
}
</script>
<script language="javascript">kstatus();function kstatus(){self.status="<%=rs("Description")%>";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('look.asp?id1='+id);
}
</script>
  <style type="text/css">
<!--
.style1 {color: #FF0000}
.样式3 {color: #929C49}
.样式4 {color: #000000}
-->
  </style>
</HEAD>
<BODY bgcolor="#ffffff" topmargin="0" leftmargin="0">
<TABLE width="776" border=0 align=center cellPadding=0 cellSpacing=0>
  <TBODY>
    <TR>
      <TD><div align="center">
        <!--#include file=top.asp-->
      </div></TD>
    </TR>
  </TBODY>
</TABLE>
<table width="776" height="90" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="3"></td>
  </tr>
</table>
<div align="center"></div>
<table width="776" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr align="center">
    
    <td width="2"></td>
  
    <td valign="top">
      <table width="100%" height="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td bgcolor="#FFA200" height="5"></td>
        </tr>
        <tr>
          <td height="4"></td>
        </tr>
        <tr>
          <td>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr align="center"><%
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")
 %>
                <td width="12"></td>
                <td width="412">
                  <table width="100%"  border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td width="17%"><strong> &nbsp;&nbsp;影片名称:</strong></td>
                      <td width="83%"><b>
                        <%=title%></b></td>
                    </tr>
                    <tr>
                      <td><strong> &nbsp;&nbsp;主要演员:</strong></td>
                      <td><font face="宋体">
                        <%content=rs("name")
                          if len(content)>18 then content=left(content,18)&"…"
                          response.write content
                            %>
                      </font></td>
                    </tr>
                    <tr>
                      <td><strong>&nbsp;&nbsp;观看次数:</strong> </td>
                      <td><span class="样式4"><%=rs("hits")%>　</span>次                                              </td>
                    </tr>
                  </table>
                  <table width="100%" height="100%" border="0" cellspacing="0" cellpadding="4">
                    <tr>
                      <td valign="top">
                        <table width="100%"  border="0" cellspacing="0" cellpadding="0">
                          <tr>
                            <td width="194"><table width="100%" border="0" cellspacing="0" cellpadding="2">
                              <tr>
                                <td width="34%" height="5" align="center" background="../../img/show_line_top.gif"></td>
                                <td width="66%" align="center" background="images/show_line_top.gif"></td>
                              </tr>
                              <tr>
                                <td><strong>影片分类:</strong> </td>
                                <td><%=ittype%></td>
                              </tr>
                              <tr>
                                <td><strong>推荐程度:</strong></td>
                                <td><SPAN class=xinxin><img border="0" src="img/<%=rs("softlevel")%>STAR.GIF"></SPAN></td>
                              </tr>
                              <tr>
                                <td><strong>影片格式:</strong></td>
                                <td><font face="宋体"><span 
                                id=lblFormat>
                                  <% 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%>
                                  </span></font></td>
                              </tr>
                              <tr>
                                <td><strong>影片长度:</strong></td>
                                <td><font face="宋体"><span 
                                id=lblTimeslice>
                                  <%=rs("howlong")%>      分钟 </span></font></td>
                              </tr>
                              <tr>
                                <td><strong>加入时间:</strong></td>
                                <td><font face="宋体">
                                  <%=rs("dateandtime")%></font></td>
                              </tr>
                              <tr>
                                <td height="5" align="center" background="../../img/show_line_top.gif"></td>
                                <td align="center" background="images/show_line_top.gif"></td>
                              </tr>
                            </table></td>
                            <td width="210"><div align="center">
                              <%
	set rsad=server.createobject("adodb.recordset")
	sqlad="select * from indexad"
	rsad.open sqlad,conn,1,1
%>
                              <%=rsad("centerad")%></div></td>
                          </tr>
                        </table>
                        <table width="100%"  border="0" cellspacing="1" cellpadding="0">
                          <tr>
                            <td width="91%"><strong>点播每集:</strong>需花&nbsp;<img border=0 src=img/<%=rs("count")%>.gif> 影币 </td>
                          </tr>
                          <tr>
                            <td>
                              <input type="button" name="Submit2" value="报告该片有错误" class="input" onClick="window.open('sendeoff.asp?title=<%=title%>','film','scrollbars=no,resizable=no,width=460,height=380,menubar=no,top=168,left=168')">
                              &nbsp;
                            <input type="button" name="Submit2" value="发表评论" class="input" onClick="window.open('fbpl.asp?id=<%=rs("articleid")%>')"></td>
                          </tr>
                        </table></td>
                  </table>
              </tr>
              </table></td>
        </tr>
        <tr>
          <td colspan="3">
            <table width="100%" border="0" cellspacing="0" cellpadding="4">
              <tr>
                <td colspan="2"><img src="images/show_intro.gif" width="79" height="22" border="0"> </td>
              </tr>
              <tr>
                <td colspan="2" bgcolor="#E493DE" height="5"></td>
              </tr>
              <tr>
                <td valign="top" width="35">　</td>
                <td valign="top"><font face="宋体"><SPAN 
                                id=lblBrief>
                  <b>本片建议下载后播放</b><br />
&nbsp;&nbsp;&nbsp;&nbsp;
</SPAN></font>
                  <font face="宋体"><SPAN>
                  <%content=rs("content")
                          if len(content)>191 then content=left(content,191)&"……"
                          response.write content
                            %>
                  <br />
                  <br />
                  <br />
                  <br />
                  <br />
                  <br />
                  </SPAN></font></td>
              </tr>
          </table></td>
        </tr>
    </table></td>
  </tr>
</table>
<div align="center">
  <table width="776" border="0" cellspacing="0" cellpadding="0">
    <tr>
      <td height="3"><!--Blank--></td>
    </tr>
    <tr>
      <td height="38"><div align="center">
        </div>
          <!--Blank--></td>
    </tr>
  </table>
</div>
</BODY> 

						