admin_bbsdel.asp

来自「大榕树网络文章管理系统」· ASP 代码 · 共 27 行

<%
Option Explicit
Response.buffer=true
const purviewlevel=3
%>
<!--#include file="admin_PurviewChe.asp" -->
<!--#include file="conn.asp" -->
<% dim sql,bookid,sql1,bid
   bookid=trim(Request.QueryString("bookid"))
   bid=trim(request.form("bid"))
   if bookid<>"" then
   sql="delete from userbook where bookid="&bookid
		conn.execute sql 		
   sql1="delete from reuserbook where bookid="&bookid
        conn.execute sql1
		
		else if bid<>"" then
	sql="delete from userbook where bookid in("&bid&")"
		conn.execute sql 		
   sql1="delete from reuserbook where bookid  in("&bid&")"
        conn.execute sql1
		end if
		end if
	call closeconn()
	response.redirect("admin_BBSManage.asp")
%>