📄 wmadown.asp
字号:
<%PageName="UserModify"%>
<!--#include file="conn.asp"-->
<!--#include file="functionuser.asp"-->
<!--#include file="bzmtvconst.asp"-->
<!--#include file="Star.INC"-->
<!--#include file="path.asp"-->
<%
id=request.QueryString("id")
If id="" Then
Response.Write ("<SCRIPT language=JavaScript>alert('错误!\n\n您至少需要选择一首歌曲');javascript:window.close();</SCRIPT>")
Response.end
End If
'创建排列顺序
MusicArray=Split(id, ",")
MusicNum = UBound(MusicArray)
set rs=server.createobject("adodb.recordset")
For i=0 To MusicNum
sql="select * from [Special] where Specialid ="&MusicArray(i)
rs.open sql,conn,1,3
If not rs.eof Then
rs("hits")=rs("hits")+1
rs.Update
Name=rs("Name")
NClass=rs("NClass")
songpath=rs("song_path")
If songpath="" or IsNull(songpath) Then
songpath=1
End If
Select Case songpath
Case 1
song_path=song_path1
Case 2
song_path=song_path2
Case 3
song_path=song_path3
Case 4
song_path=song_path4
Case 5
song_path=song_path5
Case else
song_path=song_path1
End Select
song_path=song_path&rs("Wma")
%>
<%
End If
rs.close
Next
conn.close
set rs=nothing
%>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>下载歌曲：《<%=Name%>》==<%=webname%>--<%=weburl%></title>
<LINK href="../images/index.css" rel=stylesheet type=text/css>
<body topmargin="0" leftmargin="0">
<div align="center">
<center>
<table border="0" cellpadding="5" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="300" height="310">
<tr>
<td width="100%" valign="top">
<table border="0" cellpadding="5" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" height="218">
<tr>
<td width="30%" height="12"><font color="#FF6600">
<span style="font-size: 10.8pt; font-weight: 700">歌曲名称：</span></font></td>
<td width="70%" height="12"><%=Name%></td>
</tr>
<tr>
<td width="30%" height="12"><font color="#FF6600">
<span style="font-size: 10.8pt; font-weight: 700">歌手姓名：</span></font></td>
<td width="70%" height="12"><%=NClass%></td>
</tr>
<tr>
<td width="100%" colspan="2" height="158" align="center">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="200" height="125">
<tr>
<td width="197" height="135">
<a href="<%=song_path%>">
<img border="0" src="../images/musicdown1.gif"></a></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="100%" colspan="2" height="12" bgcolor="#EEEEEE">下载说明：在下载链接上按下鼠标的右键,弹出菜单后,选点"目标另存为",然后选择你想存盘的位置,点击"保存"便可以下载了.</td>
</tr>
</table>
</td>
</tr>
</table>
</center>
</div>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -