delete_notice.asp

超级留言簿（dxxo） 本留言参考了网上很多留言簿改进而来

<%sub delete_notice()
if request("confirm")<>"ok" then
confirm_html="<table width=100% height=151 border=1 cellspacing=0 cellpadding=3 bordercolorlight=#333333 bordercolordark=#FFFFFF>        <tr>           <td width='100%' height='6' class=link  align=center>您真的要删除这条公告吗？<p><br>  [<a href='?user="&request("user")&"&action=delete_notice&confirm=ok&noticeid="&request("noticeid")&"'>是的</a>] &nbsp;&nbsp;&nbsp;&nbsp;[<a href='javascript:history.go(-1);'>取消</a>]</td></tr></table>"
table(confirm_html)
else
if request("noticeid")="" or session("user")="" then
response.write("<meta HTTP-EQUIV='REFRESH' CONTENT='0;URL=?user="&request("user")&"'")
else
sql_notice="delete * from notice where id="&request("noticeid")&""
conn.execute(sql_notice)
delok_html="<table width=100% height=151 border=1 cellspacing=0 cellpadding=3 bordercolorlight=#333333 bordercolordark=#FFFFFF>        <tr>           <td width='100%' height='6' class=link  align=center><meta HTTP-EQUIV='REFRESH' CONTENT='3;URL=?user="&request("user")&"&action=read_notice'>  请等待，系统正在处理您的删除信息..... <br>  公告删除成功,3秒后我们将带你返回这个留言本的首页.<br>  如果系统没有反应请按下面的链接返回公告板！<p><br>  [<a href=?user="&request("user")&"&action=read_notice>返回我的公告板</a>] </td></tr></table>"
table(delok_html)
end if
end if
end sub
%>