<% call log_chk() theX=trim(request("theX")) if theX<>"" then '-----------------判断小类是否为空！ set rs1=conn.execute("select * from csclass where cb_id="&theX&"") if not rs1.eof and not rs1.bof then call backurl("该大类下小类有信息，您不能删除！") rs1.close set rs1=nothing end if '-----------------删除大类！为彻底，也删除小类以及相关新闻 conn.Execute("delete from cbclass where cb_id="&theX&"") conn.Execute("delete from csclass where cb_id="&theX&"") conn.Execute("delete from bdcp where cb_id="&theX&"") conn.Close Set conn=Nothing response.write"" response.end end if %>