

<%if Session("weight")=0 then 
	Response.Redirect "error.asp?cause=4"
end if
%>

<object runat=server id=connpic progid="adodb.connection"></object>
<%application.Lock
connpic.Open Application("p_pic")
Application.UnLock
%>
<%
id=request("id")

set rs_apply=server.createobject("adodb.recordset")
sql="delete * from sound where id ="& id 
rs_apply.open sql,connpic,3,2

connpic.close

Response.Redirect "sound_manage.asp"
 %>
  