📄 mydown.asp

📁 网吧影印系统！很详细！可直接使用！请大家指点！
💻 ASP
字号:
<!--#include file="articleconn.asp"-->
<!--#include file="inc/config.asp"-->
<%
articleid=request("id")
if isnumeric(articleid)=false then
response.redirect "error.asp"
end if
   %>
<%
   dim sql
   dim rs
   articleid=clng(request("id"))
   set rs=server.createobject("adodb.recordset")
   sql="update learning set hits=hits+1 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")

 %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>《<%=title%>》<%=homes%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK 
href="../images/style.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">kstatus();function kstatus(){self.status="欢迎来到七彩影院，最便宜的在线电影站，请牢记本站域名http://61.157.80.118";setTimeout("kstatus()",0);}</script>
<SCRIPT language=javascript>
<!--
var state=0
window.resizeTo(600,560);
window.moveTo((screen.width-600)/2, (screen.height-560)/2);
//-->
</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>
<BODY bgColor=#3b5815 leftMargin=0 topMargin=0 marginheight="0" marginwidth="0">
<DIV id=overDiv style="Z-INDEX: 1; POSITION: absolute"></DIV>
<TABLE cellSpacing=0 cellPadding=0 width=562 align=center border=0>
  <TBODY>
  <TR>
    <TD align=middle height=27><IMG src="../images/mayimovie.gif"></TD></TR>
  <TR>
    <TD background=../images/mediatop2.gif 
      height=27>
    <p align="center">&nbsp;&nbsp;&nbsp;&nbsp;<SPAN class=title><%=title%> -- 会员下载区</SPAN>   
    </TD></TR>  
  <TR>  
    <TD background=../images/mediabg.gif>  
      <TABLE cellSpacing=10 cellPadding=5 width="100%" align=center border=0>  
        <TBODY>  
        <TR>  
          <TD>  
            <TABLE cellSpacing=0 cellPadding=0 width="100%"   
            borderColorLight=#000000 border=0>  
              <TBODY>  
              <TR>
                <TD vAlign=top align=right width=95>下载每集需：</TD></FORM>  
                <TD><img border=0 src=../img/<%=rs("count")%>.GIF>个影币(只对计点会员有用)</TD></TR>
              <tr>
                <TD vAlign=top align=right width=95>下载此电影：</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%><a class="real" href="down.asp?id1=<%=rsurl("id")%>&id2=<%=articleid%>">&nbsp;&nbsp;<%=c%>&nbsp;</a><%else%><a class="real" href="down.asp?id1=<%=rsurl("id")%>&id2=<%=articleid%>">&nbsp;<%=c%>&nbsp;</a><% if c mod 15=0 then%><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>
              </TBODY></TABLE></TD></TR>  
        <TR borderColorLight=#000000>  
          <TD>  
            <BLOCKQUOTE> 
              <P>说明：在弹出的新窗口中用网际快车下载。</font></b><BR>
                <BR>
                请用网际快车下载。<a target="_blank" href="http://www4.skycn.com/soft/879.html"><FONT   
              color=#0000ff>网际快车软件&gt;&gt;</FONT></a><br>
              如果不能下载请看<a target="_blank" href="downhelp.asp"><font color="#FF0000">下载帮助&gt;&gt;</FONT></a></P>  
              <OL>
                <li>非包月会员点击弹出下载地址后就会扣掉相应的影币，同一部影片第一次购买后，可以免费观看或者下载<font color="#FF0000"><b>5次</b></font>，每点一下为一次，不论集数多少！因此如果要看电视剧的会员建议您使用包月制会比较划算！ 
                <li>请注意，每次不要设置可能超过<font   
                color=#ff0000><strong>24</strong></font>小时以上的任务，每天下载地址有变动，请不要点击超过3部电影同时下载，否则碰到批量修改地址，将会浪费你的点数。 
                <li>下载完的影片是以“<strong><font   
                color=#ff0000>.ASP</font></strong>”为扩展名的文件，不能播放。我在这里说一下，山东影院上所有的影片都不会以“<strong><font   
                color=#ff0000>.ASP</font></strong>”为扩展名的,如果你下回去的是以“<font   
                color=#ff0000><strong>.ASP</strong></font>”为扩展名的文件，请注意网际快车里的设置，在添加新下载任务时里面有一项“重命名(E)”，您不要修改它，这样下载回去的影片名就不会有错的了，如果下载后文件名错，你也可以手工改成扩展名为.rm。 
                </li>
                </OL>
            </BLOCKQUOTE></TD></TR>  
        <TR borderColorLight=#000000>  
          <TD align=middle><INPUT class=button1 onclick=javascript:self.close() type=button value=关闭本窗口 name=Submit></TD></TR></TBODY></TABLE></TD></TR>  
  <TR borderColorLight=#000000>  
    <TD align=middle bgcolor="#99CC00">
    <IMG height=69 src="../images/mediaend.gif" 
    width=562></TD>
  </TR></TBODY></TABLE></BODY></HTML>  


<p>
</p>
⌨️ 快捷键说明

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