我下了以个电影网站,在线播放正常!但无法下载,不知道怎么回事?请各位高手指点! 下面是代码: <html>
<p>
<head> <meta http-equiv="Content-Language" content="zh-cn"> <meta name="GENERATOR" content="Microsoft FrontPage 5.0"> <meta name="ProgId" content="FrontPage.Editor.Document"> </head>
<% dim sql dim rs articleid=request("id2") urlid=request("id1") if request.cookies("userid")="" or request.cookies("password")="" or application(""&request.cookies("userid")&"")="" then %> <script language="JavaScript"> <!-- function checkinput() { if (document.search.userid.value=="") { alert("请输入用户名!"); document.search.userid.focus(); return false; }
if (document.search.password.value=="") { alert("请输入密码!"); document.search.password.focus(); return false; } return true; } --> </script> <title></title> <body scroll="no" marginwidth="0" leftmargin="0" topmargin="0">
</p> <p> </p> <p> </p> <div align="center"> <center> <form method="POST" action="userpass.asp" name="search" onsubmit="return checkinput()"> <table border="0" cellpadding="0" cellspacing="1" style="border-collapse: collapse" width="223" id="AutoNumber1" bgcolor="#986800"> <tr> <td width="100%"> <table border="0" cellspacing="0" style="border-collapse: collapse" width="233" id="AutoNumber1" cellpadding="4" height="109"> <tr> <td width="223" colspan="2" bgcolor="#986800" height="3"> <font size="2" color="#FFFFFF">点播观看影视,请先<b>登陆</b>!</font></td> </tr> <tr> <td width="58" bgcolor="#EEEEEE" height="17"><font size="2">用<span lang="en-us"> </span>户</font><span lang="en-us"><font size="2">:</font></span></td> <td width="165" bgcolor="#EEEEEE" height="17"> <input type="text" name="userid" size="20" style="color: #000000; border-style: solid; border-width: 1; background-color: #FFCC30"></td> </tr> <tr> <td width="58" bgcolor="#EEEEEE" height="17"><font size="2">密 码:</font></td> <td width="165" bgcolor="#EEEEEE" height="17"> <input type="password" name="password" size="20" style="color: #000000; border-style: solid; border-width: 1; background-color: #FFCC30"></td> </tr> <tr> <td width="58" bgcolor="#EEEEEE" height="19"> </td> <td width="165" bgcolor="#EEEEEE" height="19"> <input type="submit" value="提交" name="B1" style="color: #000000; border-style: solid; border-width: 1; background-color: #FFCC30"> <input type="reset" value="重置" name="B2" style="color: #000000; border-style: solid; border-width: 1; background-color: #FFCC30"></td> </tr> <tr> <td width="223" colspan="2" bgcolor="#EEEEEE" height="13"> <font size="2">你还没有注册? </font> <a target="_blank" href="reg.asp"> <font size="2" color="#ff0000">点击这里立刻申请</font></a></td> </tr> </table> </td> </tr> </table> </form> </center> </div> <%response.end end if userid=request.cookies("userid") set rs=server.createobject("adodb.recordset") sql="select serverip,canlook,movietype,title from learning where articleid="&articleid rs.open sql,conn,1,1 set rst=server.createobject("adodb.recordset") sql="select money,lasthits,oklook from users where userid='"&request.cookies("userid")&"' and password='"&request.cookies("password")&"'" rst.open sql,conn,1,3 if rs("canlook")<>0 then if now() > rst("money") then%> <body scroll="no" marginwidth="0" leftmargin="0" topmargin="0">
<p> </p> <p> </p> <div align="center"> <center> <table border="0" bordercolorlight="#000000" bordercolordark="#FFFFFF" cellspacing="0" bgcolor="#986800" style="border-collapse: collapse" bordercolor="#111111" cellpadding="1"> <tr> <td> <div align="center"> <center> <table border="0" bgcolor="#986800" cellspacing="0" cellpadding="2" width="350" style="border-collapse: collapse" bordercolor="#111111"> <tr> <td width="342"><font color="FFFFFF">¤</font><font color="FFFFFF" size="2">出错提示</font></td> <td width="18"> <table border="1" bordercolorlight="666666" bordercolordark="FFFFFF" cellpadding="0" bgcolor="E0E0E0" cellspacing="0" width="18"> <tr> <td width="16"><b> <a href="javascript:history.go(-1)" onMouseOver="window.status='';return true" onMouseOut="window.status='';return true" title="关闭"> <font color="000000">×</font></a></b></td> </tr> </table> </td> </tr> </table> </center> </div> <table border="0" width="350" cellpadding="4" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" height="109"> <tr> <td width="54" align="center" valign="middle" bgcolor="#E0E0E0" height="72"> <font face="Wingdings" color="#986800" size="7">L</font></td> <td width="280" bgcolor="#E0E0E0" height="72"><font size="2"> 你没有包月或者你包月的时间已经到期!请重新<a target="_blank" href="user/buy.asp"><font color="#FF0000">续费</font></a>你的账号吧!</font></td> </tr> <tr> <td colspan="2" align="center" valign="top" bgcolor="#E0E0E0" width="342" height="21"> <input type="button" name="ok" value=" 确 定 " onclick="javascript:window.close()"><font size="2"> </font></td> </tr> </table> </td> </tr> </table> </center> </div> <%response.end end if end if serverip=rs("serverip") if rst("oklook")<4 then%> <body scroll="no" marginwidth="0" leftmargin="0" topmargin="0" bgcolor="#000000" oncontextmenu="window.event.returnValue=false" ondragstart="window.event.returnValue=false" onselectstart="event.returnValue=false">
<p> </p> <p> </p> <div align="center"> <center> <table border="0" bordercolorlight="#ffffff" bordercolordark="#FFFFFF" cellspacing="0" bgcolor="#986800" style="border-collapse: collapse" bordercolor="#111111" cellpadding="1"> <tr> <td> <div align="center"> <center> <table border="0" bgcolor="#986800" cellspacing="0" cellpadding="2" width="350" style="border-collapse: collapse" bordercolor="#111111"> <tr> <td width="342"><font color="FFFFFF">¤</font><font color="FFFFFF" size="2">出错提示</font></td> <td width="18"> <table border="1" bordercolorlight="666666" bordercolordark="FFFFFF" cellpadding="0" bgcolor="E0E0E0" cellspacing="0" width="18"> <tr> <td width="16"><b> <a href="javascript:history.go(-1)" onMouseOver="window.status='';return true" onMouseOut="window.status='';return true" title="关闭"> <font color="000000">×</font></a></b></td> </tr> </table> </td> </tr> </table> </center> </div> <table border="0" width="350" cellpadding="4" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" height="109"> <tr> <td width="54" align="center" valign="middle" bgcolor="#E0E0E0" height="72"> <font face="Wingdings" color="#986800" size="7">L</font></td> <td width="280" bgcolor="#E0E0E0" height="72"><font size="2"> 很抱歉你的用户等级不够,该部电影需要钻石会员才可以下载!重新<a target="_blank" href="user/buy.asp"><font color="#FF0000">续费</font></a>12个月升级到钻石会员。</font></td> </tr> <tr> <td colspan="2" align="center" valign="top" bgcolor="#E0E0E0" width="342" height="21"> <input type="button" name="ok" value=" 确 定 " onclick="javascript:window.close()"><font size="2"> </font></td> </tr> </table> </td> </tr> </table> </center> </div> <%response.end end if
tdate=date() if rst("lasthits")=tdate then sql="update users set dnlook=dnlook+1,nlook=nlook+1 where userid='"&request.cookies("userid")&"' and password='"&request.cookies("password")&"'" conn.Execute(sql) else conn.Execute("update users set dnlook=1,lasthits='"&tdate&"' where userid='"&request.cookies("userid")&"' and password='"&request.cookies("password")&"'") end if set rst=server.createobject("adodb.recordset") sql="select money,nlook,oklook,lasthits,dnlook from users where userid='"&request.cookies("userid")&"' and password='"&request.cookies("password")&"'" rst.open sql,conn,1,3 if rst("oklook")<2 then if rst("dnlook")>4 then '每天可看4集%> <body scroll="no" marginwidth="0" leftmargin="0" topmargin="0">
<p> </p> <p> </p> <div align="center"> <center> <table border="0" bordercolorlight="#000000" bordercolordark="#FFFFFF" cellspacing="0" bgcolor="#986800" style="border-collapse: collapse" bordercolor="#111111" cellpadding="1"> <tr> <td> <div align="center"> <center> <table border="0" bgcolor="#986800" cellspacing="0" cellpadding="2" width="350" style="border-collapse: collapse" bordercolor="#111111" height="8"> <tr> <td width="342" height="4"><font color="FFFFFF">¤</font><font color="FFFFFF" size="2">出错提示</font></td> <td width="18" height="4"> <table border="1" bordercolorlight="666666" bordercolordark="FFFFFF" cellpadding="0" bgcolor="E0E0E0" cellspacing="0" width="18"> <tr> <td width="16"><b> <a href="javascript:history.go(-1)" onMouseOver="window.status='';return true" onMouseOut="window.status='';return true" title="关闭"> <font color="000000">×</font></a></b></td> </tr> </table> </td> </tr> </table> </center> </div> <table border="0" width="350" cellpadding="4" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" height="109"> <tr> <td width="54" align="center" valign="middle" bgcolor="#E0E0E0" height="72"> <font face="Wingdings" color="#986800" size="7">L</font></td> <td width="280" bgcolor="#E0E0E0" height="72"><font size="2"> 你是普通会员今天观看已经超过四集!请明天再观看吧!重新<a target="_blank" href="user/buy.asp"><font color="#FF0000">续费</font></a>12个月升级到黄金会员。</font></td> </tr> <tr> <td colspan="2" align="center" valign="top" bgcolor="#E0E0E0" width="342" height="21"> <input type="button" name="ok" value=" 确 定 " onclick="javascript:window.close()"><font size="2"> </font></td> </tr> </table> </td> </tr> </table> </center> </div> <%response.end end if elseif rst("oklook")<5 then if rst("dnlook")>12 then '每天可看10集%> <body scroll="no" marginwidth="0" leftmargin="0" topmargin="0">
<p> </p> <p> </p> <div align="center"> <center> <table border="0" bordercolorlight="#000000" bordercolordark="#FFFFFF" cellspacing="0" bgcolor="#986800" style="border-collapse: collapse" bordercolor="#111111" cellpadding="1"> <tr> <td> <div align="center"> <center> <table border="0" bgcolor="#986800" cellspacing="0" cellpadding="2" width="350" style="border-collapse: collapse" bordercolor="#111111"> <tr> <td width="342"><font color="FFFFFF">¤</font><font color="FFFFFF" size="2">出错提示</font></td> <td width="18"> <table border="1" bordercolorlight="666666" bordercolordark="FFFFFF" cellpadding="0" bgcolor="E0E0E0" cellspacing="0" width="18"> <tr> <td width="16"><b> <a href="javascript:history.go(-1)" onMouseOver="window.status='';return true" onMouseOut="window.status='';return true" title="关闭"> <font color="000000">×</font></a></b></td> </tr> </table> </td> </tr> </table> </center> </div> <table border="0" width="350" cellpadding="4" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" height="109"> <tr> <td width="54" align="center" valign="middle" bgcolor="#E0E0E0" height="72"> <font face="Wingdings" color="#986800" size="7">L</font></td> <td width="280" bgcolor="#E0E0E0" height="72"><font size="2"> 你是钻石会员今天观看已经超过十二集!请明天再观看吧!</font></td> </tr> <tr> <td colspan="2" align="center" valign="top" bgcolor="#E0E0E0" width="342" height="21"> <input type="button" name="ok" value=" 确 定 " onclick="javascript:window.close()"><font size="2"> </font></td> </tr> </table> </td> </tr> </table> </center> </div> <%response.end end if end if set rsb=server.createobject("adodb.recordset") rsb.open "select * from tolook",conn,1,3 rsb.addnew rsb("title")=rs("title") rsb("userip")=request.servervariables("remote_addr") rsb("userid")=request.cookies("userid") rsb("lookordown")="下载" rsb("oklook")=rst("oklook") rsb.update rsb.close set rsb=nothing set rst=server.createobject("adodb.recordset") sql="select url from movieurl where id="&urlid rst.open sql,conn,1,1 terok=request.cookies("userid")&request.cookies("password") application(""&terok&"")="yes" %> <body scroll="no" marginwidth="0" leftmargin="0" topmargin="0">
<head>
<script language="JavaScript"> function will() { if (event.srcElement.tagName=='A'||event.srcElement.tagName=='IMG') { window.focus(); oUrl.style.display = ""; } }
</script> <base target="_blank" onClick="JavaScript:will()"> <script language="javascript"> function click() { if (event.button==1) { //改成button==2为禁止右键 alert('对不起,请使用右键目标另存为或网际快车等下载工具下载!') } } document.onmousedown=click </script> </head> <p> </p> <p> </p> <p> </p> <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1"> <tr><td><div align="center"><a href="downurl.asp?serverip=<%=serverip%>&real=<%=rst("url")%>&uset=<%=terok%>"> <img border="0" src="IMG/down3.gif"></a> </div> </td> </tr> <tr> <td width="100%"> <p align="center"><b><font color="#FF0000" size="2">点击右键目标另存为,或用网际快车下载<br> 该地址只能下载一次如果要重新下载请重新刷新本页面<br> 你的下载的电影都被本站记录请不要同时下载两部以上电影一经发观将封销帐号</font></b></td> </tr> </table> <p>
</body>
</html> <% rs.close set rs=nothing rst.close set rst=nothing conn.close set conn=nothing %></body></body></body></body></body></body></body></p></body></html>