<!--#include file="../inc.asp"-->
<!--#include file="../ydzq1.asp"-->
<%call head
call saycardd("删除广播")
if keys<>1 then
call error("权限不足")
end if

if request.QueryString("tp")=1 then
conn.Execute"delete from lb where id="&request("ids")
%>删除成功
<%else
set rs=Server.CreateObject("ADODB.Recordset")
  rs.open"select bbslbtxt from lb where id="&ids,conn,1,1
%>
是否删除:<%=bbslbtxt%><br/>
<%  rs.close
  set rs=nothing%>
<a href="scxx.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>&amp;tp=1&amp;ids=<%=request("ids")%>">是</a>|<a href="index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">否</a><br/>
<%end if%>
<br/><a href="index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">返回广播</a><br/>
<a href="../index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">返回社区</a><br/>
<%call head1%>



