www.gusucode.com > 盘锦DJ舞曲网 商业版源码程序 > down.asp
<!--#include file="config.asp"-->
<%
id=checkinfo(request("id"),1)
if request("id")=""then
response.write("<script>alert('非法参数！');window.opener=null;window.close()</script>")
response.end
end if
Select Case musicdown
case 1
response.write("<script>alert('对不起！管理员关闭了歌曲下载功能！请稍后再试');window.opener=null;window.close()</script>")
response.end
case 3
userid=request.cookies("user")("id")
if userid="" then
response.write("<script>alert('对不起！您尚未登录，请登录后下载');window.opener=null;window.close()</script>")
response.End
end if
case 4
userid=request.cookies("user")("id")
if userid="" then
response.write("<script>alert('对不起！您尚未登录，请登录后下载');window.opener=null;window.close()</script>")
response.End
end if
if request.Cookies("user")("vip")<>"认证会员" then
response.write("<script>alert('对不起！当前系统仅限VIP会员下载！');window.opener=null;window.close()</script>")
response.End
end if
End Select
set rs=server.createobject("adodb.recordset")
sql1="select musiclist.musicname,musiclist.musicpath,server.downurl from musiclist,server where musiclist.id="&id
sql=sql1&"and server.serverid=musiclist.serverid"
rs.open sql,conn,1,1
path=InStrRev(rs("musicpath"),".")
url=left(rs("musicpath"),path-1)&".rm"
downurl=rs("downurl")&url
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>下载舞曲:<%=rs("musicname")%></title>
<style type="text/css">
<!--
body,td,th {
font-size: 12px;
}
a:link {
color: #000000;
text-decoration: none;
}
a:visited {
text-decoration: none;
color: #000000;
}
a:hover {
text-decoration: none;
color: #FF0000;
}
a:active {
text-decoration: none;
color: #000000;
}
-->
</style></head>
<body topmargin="0" leftmargin="0" rightmargin="0">
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><iframe width="760" height="30" src="/ad/index_020.htm" frameborder="no" border="0" marginwidth="0" marginheight="0" scrolling="no"></iframe></td>
</tr>
</table>
<table width="760" height="115" border="0" align="center" cellpadding="0" cellspacing="3" bordercolor="#FFFFFF" bgcolor="#E6E6E6">
<tr>
<td colspan="2" bgcolor="#FFFFFF"><iframe align="center" width="760" height="80" src="/ad/index_020.htm" frameborder="no" border="0" marginwidth="0" marginheight="0" scrolling="no"></iframe></td>
</tr>
<tr>
<td width="289" height="70" bgcolor="#FFFFFF">
<a href="<%=downurl%>"><font color="#FF0000"><b>①号下载服务器</b></font></a><font color="#9A9A9A"> (24小时免费下载速度：32KB/S)</font><br>
<br>
下载方法：单击鼠标右键，选择目标另存为</td>
<td width="460" valign="top" bgcolor="#FFFFFF"><iframe width="468" height="100" src="/ad/index_020.htm" frameborder="no" border="0" marginwidth="0" marginheight="0" scrolling="no"></iframe></td>
</tr>
</table>
<div align="center">
<iframe width="760" height="100" src="/ad/index_020.htm" frameborder="no" border="0" marginwidth="0" marginheight="0" scrolling="no"></iframe>
</div>
<script src='http://s51.cnzz.com/stat.php?id=767923&web_id=767923' language='JavaScript' charset='gb2312'></script></div>
</body>
</html>