classdelbig.asp

来自「一个企业管理ASP源码.增加了一些新的功能.」· ASP 代码 · 共 18 行

<%@language=vbscript codepage=936 %>
<!--#include file="Conn.asp"-->
<!--#include file="basedsoftadmin.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
end if
call CloseConn()      
response.redirect "ClassManage.asp"
%>