📄 bd_delete.asp
字号:
<!-- #include file="top.asp" -->
<!-- #include file="share.asp" -->
<% checkauthority %>
<%
dim isok
isok=request.form("isok")
if isok="yes" then
deletebd request.form("bdid")
else
showconfirm
end if
conn.close
set conn=nothing
%>
<%
function deletebd(bdid)
dim emsg
emsg=""
if trim(bdid)="" then
emsg="程序错误。"
else
dim rs
dim sql
sql="select * from board where bdid="&clng(bdid)
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
if rs.eof then
emsg="没有这个版面。或者已经被删除了。"
else
rs.delete
rs.update
end if
rs.close
set rs=nothing
end if
if emsg="" then
showok
else
showerr emsg
end if
end function
%>
<% sub showerr(emsg) %>
<script language="javascript">
alert("<%=emsg%>");
location="index.asp";
</script>
<% end sub %>
<% sub showok%>
<script language="javascript">
alert("删除操作完成！");
location="index.asp";
</script>
<% end sub %>
<% sub showconfirm %>
<html>
<head>
<title>3鸟设社[色彩连视版]T恤论坛管理-版面删除</title>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../blue.css" type="text/css">
<style type="text/css">
<!--
.hand { cursor: hand }
-->
</style>
</head>
<body bgcolor=#ffffff leftmargin="0" topmargin="0">
<table width="760" height="602" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="20" height="13" bgcolor="#FFFFFF"></td>
<td width="719" height="13"></td>
<td width="21" height="13" bgcolor="#FFFFFF"></td>
</tr>
<tr>
<td width="25" height="455" background="images/bg.gif"><p> </p>
<p> </p></td>
<td width="719" height="455" valign="top"><table width="720" border="0" cellspacing="0">
<tr>
<td height="49"> <div align="center"><a href=".."><br>
<br>
<br>
<br>
返回论坛</a>] [<a href="index.asp">返回管理首页</a>] <br>
<br>
</div></td>
</tr>
<tr>
<td><table width="72%" height="73" border="0" align="center" cellpadding="0" cellspacing="3">
<tr align="left" valign="top">
<td width="94%"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="21%" height="20" align="left" valign="middle"><div align="right"><img src="../images/frame_forum2.gif" align="absmiddle"></div></td>
<td width="79%" align="left" valign="middle" background="../images/frame_bg.gif"><font class="subtitle">版面删除确认</font></td>
</tr>
</table>
<form name="deletefrm" action="bd_delete.asp" method="post">
<table width="475" border="0" cellspacing="1" cellpadding="0">
<tr>
<td width="437" align="center"> 确认要删除这个版面吗？[bdid=<%=request("bdid")%>]<br>
<font color=RED>注意：删除版面将删除版面下的所有文章和回复。而且无法恢复。</font>
</td>
</tr>
<tr>
<td align="center"> <input type="submit" name="submitbtn" value="删除">
<input type="button" name="cancelbtn" value="取消" onclick="location='index.asp';">
<input type="hidden" name="isok" value="yes"> <input type="hidden" name="bdid" value="<%=request("bdid")%>">
</td>
</tr>
</table>
</form></td>
<td width="6%"> </td>
</tr>
</table></td>
</tr>
<tr>
<td> </td>
</tr>
</table></td>
<td width="25" height="451" background="images/bg.gif"></td>
</tr>
<tr>
<td height="12" colspan="3"><div align="center">
<table width="760" border="0" align="center" cellspacing="0">
<tr>
<td height="35" colspan="2" background="images/footbg.gif"> <div align="center">3鸟设社[v1.2色彩连视]T恤论论坛
www.3niao.com</div></td>
</tr>
<tr>
<td width="392" background="http://www.3niao.com/v2/down1/images/footgb1.gif"> </td>
<td width="362"><div align="right"><img src="http://www.3niao.com/v2/down1/images/foot.jpg"></div></td>
</tr>
</table>
</div></td>
</tr>
</table>
</center>
</div>
</body>
</html>
<% end sub %>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -