📄 matrix3_delc.asp
字号:
<!-- #include file="const.asp" -->
<%
call opendb()
checkadmin()
dim sql,CID,rs
CID=nrequest("CID")
if CID="" then
call msg("出错:缺少分区ID号")
else
sql="select * from m3_forum where CID="&CID&""
set rs=server.CreateObject("ADODB.RecordSet")
rs.open sql,conn,1,1
if not (rs.eof and rs.bof) then
rs.close
set rs=nothing
call closedb()
call msg("请先把分区里的所有论坛删除!")
response.End()
else
rs.close
set rs=nothing
sql="delete from m3_category where CID="&CID&""
conn.execute(sql)
response.Redirect "matrix3_admin.asp"
end if
end if
call closedb()
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -