admin_larm.asp 星云DJ舞曲 4.5a源码程序 - ASP源码程序

www.gusucode.com > 星云DJ舞曲 4.5a源码程序 > admin/admin_larm.asp
    <!--#include file="const.asp"-->
<%
if request("id")<>"" then
set rs=server.createobject("adodb.recordset")
id=request("id")
sql="select * from MusicList 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")+9
rs.Update
id=rs("id")
ListenUrl=rs("ListenUrl")
hits=rs("hits")
MusicName=rs("MusicName")
end if
rs.Close
else
errmsg= "<li>请选择歌曲！</li>"
call error()
Response.End 
end if
set rs=nothing
conn.close
set conn=nothing
%>
<HTML>
<HEAD>
<title><%=musicname%> | TOM舞曲站--www.xy57.cn</title> 
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv=Content-Language content=zh-cn>
<meta name=GENERATOR content="Microsoft FrontPage 4.0">
<meta name=ProgId content=FrontPage.Editor.Document>
<meta content=DJ,DJ现场,DJ粗口,DJ激情,另类舞曲,粗口话. name=description>
<meta content=DJ,DJ name=keywords>
<style type=text/css>TD {
	COLOR: #000000; FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
BODY {
	COLOR: #000000; FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
SELECT {
	COLOR: #000000; FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
A {
	COLOR: #000000; FONT-FAMILY: "宋体"; FONT-SIZE: 9pt; TEXT-DECORATION: none
}
A:hover {
	COLOR: #ff0033; FONT-FAMILY: "宋体"; FONT-SIZE: 9pt; TEXT-DECORATION: none
}
.p11 {
	COLOR: #000000; FONT-FAMILY: "宋体"; FONT-SIZE: 9pt; TEXT-DECORATION: none
}
</style>
</head>
<body bgcolor="#FFFFFF" topmargin="0" leftmargin="0">
<div align="center"><br><%=musicname%><br>
	<object id="ramp" height="55" width="556" classid="CLSID:CFCDAA03-8BE4-11CF-B84B-0020AFBBCCFA">
		<param NAME="_ExtentX" value="12065">
		<param NAME="_ExtentY" value="1191">
		<param NAME="AUTOSTART" value="-1">
		<param NAME="SHUFFLE" value="0">
		<param NAME="PREFETCH" value="0">
		<param NAME="NOLABELS" value="0">
		<param NAME="SRC" ref value="sowrm.asp?songid=<%=id%>">
		<param NAME="CONTROLS" value="ControlPanel,StatusBar">
		<param NAME="CONSOLE" value="cons">
		<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="sowrm.asp?songid=<%=id%>" type="audio/x-pn-realaudio-plugin" width="458" height="45" controls="All" console="cons">                                      
</embed></object>
 </div>
</body>
</HTML>