del_qingjia.asp

职业培训学校学生档案成绩费用管理系统V1.0免费版.rar

<!--#include file="conn.asp"-->
<%
if session("user")="" then
	response.write "您无此权限"
	response.end
end if

dim id
id=trim(request("id"))

set rs=server.createobject("adodb.recordset")
sql="select * from qingjia where id="& id
rs.open sql,conn,1,3
%>

<%
rs.delete
rs.close
set rs=nothing
if isempty(request("key")) then
	response.redirect "add_qingjia.asp"
else
	response.Redirect "query.asp?id=4&user_number="&session("user_number")
end if
%>