classdelbig.asp

来自「能进行网上购物的需求」· ASP 代码 · 共 19 行

<!--#include file="conn.asp"-->
<%
if session("admin_name")="" then
        response.redirect "default.asp"
end if
%>
<%
dim BigClassName, sql
BigClassName=trim(Request("BigClassName"))
if BigClassName<>"" then
        sql="delete from BigClass where BigClassid=" & cint(BigClassName) & ""
conn.Execute sql
sql="delete from NEWS where BigClassName='" & BigClassName & "'"
conn.Execute sql
end if
'call CloseConn()
response.redirect "ClassManage.asp"
%>