smallclasskillok.asp

来自「一个不错的代码 一个不错的代码 一个不错的代码」· ASP 代码 · 共 26 行

<!--#include file="Conn.ASP"-->
<%
IF Session("KEY")<>"super"THEN
response.redirect "login.asp"
response.end
END IF

ID = Request("ID")
SmallClassName=request("SmallClassName")

button_value=trim(Request.Form("alert_button"))
if button_value="是" then

delesql="DELETE * FROM [SmallClass] WHERE SmallClassName='" & SmallClassName & "'"
conn.Execute delesql
delesql="DELETE * FROM [news] WHERE SmallClassName='" & SmallClassName & "'"
conn.Execute delesql

conn.close
set conn=nothing

end if
Response.Redirect "SmallClass.asp"

%>