www.gusucode.com > 随缘网络产品管理系统 2.0码程序 > manage/ClassDelBig.asp
<%@language=VBScript codepage=936 %> <% if not session("check")="checked" then response.Redirect "login.asp" end if %> <!--#include file="conn.asp"--> <% dim BigClassName,sql BigClassName=trim(Request("BigClassName")) if BigClassName<>"" then sql="delete from BigClass where BigClassName='" & BigClassName & "'" conn.Execute sql sql="delete from SmallClass where BigClassName='" & BigClassName & "'" conn.Execute sql sql="delete from news where BigClassName='" & BigClassName & "'" conn.Execute sql end if call CloseConn() response.redirect "ClassManage.asp" %>