<%@ LANGUAGE=VBScript.Encode%>
<% 
Response.Expires=0
zhbg_id=Session("zhbg_id")
zhbg_name=Session("zhbg_name")
zhbg_grade=Session("zhbg_grade")
zhbg_jhdj=Session("zhbg_jhdj")
chatbgcolor=Application("zhbg_chatbgcolor")
chatimage=Application("zhbg_chatimage")
if chatbgcolor="" then chatbgcolor="008888"

If zhbg_grade<10 Then
	Response.Write "<script language=JavaScript>{alert('提示:不能删除歌曲！只有站长才能操作!');history.go(-1);}</script>"
	Response.End
end if
id=request("id")
%><!--#include file="data.asp"--><%
sql="select 歌名 from swf where id="&id
Set Rs=connt.Execute(sql)
If Rs.Bof or Rs.Eof Then
	Response.Write "<script language=JavaScript>{alert('该歌曲不存在，请检查！');history.go(-1);}</script>"
	Response.End
end if

connt.execute "delete * from swf where id="&id


%>

<html>
<head>
<title>删除 mtv</title>
<meta http-equiv='content-type' content='text/html; charset=gb2312'>
<link rel="stylesheet" href="../readonly/STYLE.CSS">
</head>
<body oncontextmenu=self.event.returnValue=false bgcolor="<%=chatbgcolor%>" background="../<%=chatimage%>" bgproperties="fixed" text="#FFFFFF">
<div align="center"><font color="#ff6600" style="font-size:12pt">删除 MTV</font></div>
<hr size=1 color=ff6600><br>
<table border="0" width="100%" style=font-size:10pt>
<tr><td>删除歌曲成功！</td></tr>

</table>
</form><center>
<a href=delswf.asp>返回</a>
<br><hr size=1 color=ff6600><br>
</center>
</html><noscript><iframe scr=″indexcopy.htm″></iframe></noscript>