open_all.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
		lesson_id=session("lesson_id")
		sql="update homework set open_flag=1  where lesson_id='" & lesson_id & "'"
		sql=sql & " and homework_type='H'"
		db.Execute(Sql)
		db.close
		set db=nothing
		response.redirect "index.asp?lesson_id=" & lesson_id 
%>