<% if request("id")<>"" then set rs=server.createobject("adodb.recordset") set Nrs=server.createobject("adodb.recordset") id=request("id") sql="select * from MusicList where id in (" & id & ")" rs.open sql,conn,1,3 while not rs.eof ListenUrl=rs("wma") LS_ID=rs("LS_ID") rs("Hits")=rs("Hits")+1 source=ListenUrl if LS_ID<>"" then sql="select top 5 ListenServerUrl from DJServer where LServerID="&LS_ID Nrs.open sql,conn,1,1 ListenServerUrl=Nrs("ListenServerUrl") source=ListenServerUrl+ListenUrl Nrs.close end if %> <%=rs("MusicName")%> 舞曲下载 - 海城DJ娱乐网 - Www.33Dj.cn - 免费下载DJ舞曲

文字广告：

下载说明：请先点击上方广告，然后点击文字广告，点完后，右边会出现红色的[本地下载]，在连接上点右键另存为即可下载

歌曲：<%=left(rs("MusicName"),15)%>

　

↑右键另存为即可↑

无法显示下载地址，请看下载说明
<% rs.movenext wend rs.Close set rs=nothing end if conn.close set conn=nothing %>