<!--#include file="../inc.asp"-->
<!--#include file="../ydzq1.asp"-->

<%call head
call saycardd("清空喊话")
if keys<>1 then 
call error("权限不足")
end if
dim TP
TP=request("TP")
if TP<>"del" then
response.write "你清空喊话吗？清空后不可以恢复！<br/>[<a href=""del0.asp?TP=del&amp;saytk="&saytk&"&amp;sid="&sid&""">确定删除</a>]<br/>[<a href=""/bbs/lb/index.asp?sid="&sid&"&amp;saytk="&saytk&""">取消操作</a>]<br/>-------<br/>"
else
 conn.Execute"delete from lb"
Response.write"广播清除成功!!!"
set conn=nothing

response.write"<br/><a href=""/bbs/lb/index.asp?sid="&sid&""">我要喊话</a><br/>"
end if
%>
<br/>----------<br/>
<a href="/bbs/show.asp?sid=<%=sid%>">[我的空间]</a>|<a href="/bbs/index.asp?sid=<%=sid%>">[社区]</a><br/>
<%call head1%>