📄 song.asp
字号:
<!--#include file="conn.asp"-->
<%
if request("id")<>"" then
set rs=server.createobject("adodb.recordset")
id=request("id")
sql="select * from Music where id="&id
rs.open sql,conn,1,3
if rs.eof then
errmsg="<li>对不起！该歌曲不存在，可能已经被管理员删除。</li>"
call error()
Response.End
else
rs("hits")=rs("hits")+1
rs.Update
source=rs("Url")
MusicName=rs("Name")
end if
elseif request("checked")<>"" then
SongUrl=request("checked")
dim SongUrlArray(20)
randomize
SongUrl=trim(SongUrl)
if instr(SongUrl,",")=0 then
SongUrlArray(0)=SongUrl
else
SongUrl=replace(SongUrl," ","")
SongUrlArrayNew=split(SongUrl,",")
FoundNew=1
end if
if FoundNew=1 then
s=""
for intI=0 to ubound(SongUrlArrayNew)
s=s & SongUrlArrayNew(intI) & vbCrLf
next
else
s=SongUrl
end if
s=s&" "&vbCrLf
response.contenttype="audio/x-pn-realaudio"
response.addheader "Content-Disposition","inline; filename=playsong.ram"
response.write s
source="playsong.ram"
set rs=server.createobject("adodb.recordset")
if FoundNew=1 then
for intI=0 to ubound(SongUrlArrayNew)
sql="select hits from Music where Url='"&SongUrlArrayNew(intI)&"'"
rs.open sql,conn,1,3
if not rs.eof then
rs("hits")=rs("hits")+1
rs.update
end if
rs.close
next
else
sql="select hits from Music where Url='"&SongUrlArray(0)&"'"
rs.open sql,conn,1,3
if not rs.eof then
rs("hits")=rs("hits")+1
rs.update
end if
rs.close
end if
canend="ok"
else
errmsg= "<li>请选择歌曲！</li>"
call error()
Response.End
end if
if canend="ok" then response.end
set rs=nothing
conn.close
set conn=nothing
%>
<html>
<head>
<title><%=musicname%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="JavaScript">
function click(e) {
if (document.all) {
if (event.button==2||event.button==3) {
oncontextmenu='return false';
}
}
if (document.layers) {
if (e.which == 3) {
oncontextmenu='return false';
}
}
}
if (document.layers) {
document.captureEvents(Event.MOUSEDOWN);
}
document.onmousedown=click;
document.oncontextmenu = new Function("return false;")
</script>
<script language="JavaScript">
<!--
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->
//-->
</script>
<link href="images/music.css" rel="stylesheet" type="text/css">
<body background="images/bg.gif" leftmargin=0 topmargin=0>
<TABLE cellSpacing=0 cellPadding=0 width=310 border=0>
<TBODY>
<TR>
<TD width=10 height="34"><IMG height=34 src="img/play_r1_c1_1.gif" width=10></TD>
<TD vAlign=top width=370 background=img/play_r1_c1_bg.gif> <TABLE height=23 cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD height=21> <marquee scrollamount="3" width="100%" height="16">
<font color="#000000">正在播放: <%=musicname%> </font>
</marquee></TD>
</TR>
</TBODY>
</TABLE></TD>
<TD width=100><IMG height=34 src="img/play_r1_c5.gif" width=100
border=0></TD>
</TR>
</TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=310 border=0>
<TBODY>
<TR>
<TD><IMG height=66 src="img/play_5.gif" width=5></TD>
<TD align=middle> <OBJECT classid=clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA height=66
id=video1 width=300>
<PARAM NAME="_ExtentX" VALUE="7144">
<PARAM NAME="_ExtentY" VALUE="1746">
<PARAM NAME="AUTOSTART" VALUE="-1">
<PARAM NAME="SHUFFLE" VALUE="0">
<PARAM NAME="PREFETCH" VALUE="0">
<PARAM NAME="NOLABELS" VALUE="0">
<PARAM NAME="SRC" VALUE="<%=source%>">
<PARAM NAME="CONTROLS" VALUE="StatusBar,ControlPanel">
<PARAM NAME="CONSOLE" VALUE="Clip1">
<PARAM NAME="LOOP" VALUE="0">
<PARAM NAME="NUMLOOP" VALUE="0">
<PARAM NAME="CENTER" VALUE="0">
<PARAM NAME="MAINTAINASPECT" VALUE="0">
<PARAM NAME="BACKGROUNDCOLOR" VALUE="#000000">
<embed src="<%=source%>"
type="audio/x-pn-realaudio-plugin" console="Clip1"
controls="ControlPanel,StatusBar" height="66" width="300"
autostart="true"></embed> </OBJECT></TD>
<TD><IMG height=66 src="img/play_6.gif"
width=5></TD>
</TR>
</TBODY>
</TABLE><script>
<!--
document.write(unescape("%3Cscript%20src%3D%22http%3A//www.cqax.net/star/count.asp%3Fstyle%3D0%22%3E%0D%0A%3C/script%3E%20"));
//-->
</script>
</BODY>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -