del_board.asp

购物系统(本版为正式商业版

<!--#include file="../conn2.asp" -->
<!--#include file="set.asp"-->
<% bid=int(request.querystring("bid"))
action=request.querystring("action")
if action="lock" then
set rs=server.createobject("adodb.recordset")
sql="update board set lock=1 where bid="&bid
rs.open sql,conn,1,1
elseif action="notlock" then
set rs=server.createobject("adodb.recordset")
sql="update board set lock=0 where bid="&bid
rs.open sql,conn,1,1

elseif action="del" then
set rs=server.createobject("adodb.recordset")
sql="select * from board where bid=" & bid
rs.open sql,conn,3,3
rs.delete
conn.execute "delete from book where bid in ("&bid&")"
rs.close
set rs=nothing
end if
response.redirect "boardman.asp"%>