close.asp

来自「与asp相关的技术 如数据库和网页设计 很有用的哦」· ASP 代码 · 共 19 行

<%
if session("user_type")<>"T" then
	response.redirect "../../../index.asp"
end if
%>
<% response.buffer=true%>
<!--#INCLUDE FILE="../../../system/odbc_connection.asp"-->
<%
	dim lesson_id,homework_id
	lesson_id=session("lesson_id")
		homework_id=request("homework_id")
		sql="update homework set open_flag=0  where homework_id="  & homework_id & " and lesson_id='" & session("lesson_id") & "'"
		db.Execute(Sql)
		db.close
		set db=nothing
		response.redirect "index.asp?lesson_id=" & lesson_id 
%>