page_del.asp

来自「一套考试系统,通过局域网可以发布题目,组织考试」· ASP 代码 · 共 22 行

<!--#include file="open.asp" -->
<%
if session("zzteacher")=true then
    del_id=request.querystring("del_id")
	str="select * from test_gl where id="&del_id&""
response.write str&"<BR>"
	set rs=conn.execute(str)
	table_name=rs("数据表名")
	str="delete from test_gl where id="&del_id&""
response.write str&"<BR>"
	conn.execute(str)
	str="drop table "&table_name&""
response.write str&"<BR>"
	conn.execute(str)
	conn.close
	response.redirect("testpage_gl.asp")
else
    conn.close
	response.redirect("index.asp")
end if
%>