delete_ta.asp

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

<%
If Session("user_type")<>"T" Then
	Response.Redirect "../../../../index.asp"
End If
%>
	<%response.buffer=true%>
	<!--#INCLUDE FILE="../../../system/odbc_connection.asp"-->
	<%
		dim sql,rs,user_id,lesson_id
		lesson_id=request.querystring("lesson_id")
		user_id=request.querystring("user_id")
		'删除用户表
		sql="delete from teacher where user_id ='" & user_id & "'"
		DB.Execute(sql)
		'删除课程表里的
		sql="delete from user_lesson where user_id ='" & user_id & "'"
		DB.Execute(sql)
		db.close
		set db=nothing
		response.redirect "index.asp?user_id=" & user_id & "&lesson_id=" & lesson_id
	%>