
<%
 

'检查权限
       tname=request.cookies("tname") 
       Set MyOAASPObj= Server.CreateObject("YFSchoolOApro.YFSchoolDll")
           if MyOAASPObj.QuanXian(tname,"学籍管理")=0 then 
		    response.redirect  "../NoPower.asp"
           end if 
		   set MyOAASPObj=nothing

'检查权限结束
     
		  strYears =Request( "years" )
		  strGrade = TRIM( Request( "selgrade" ) )
		  strClass = TRIM( Request( "selClass" ) )
		  id=request("id")
     
   
     Set    MyOAASPObj = Server.CreateObject("YFSchoolOApro.YFSchoolDll")
     call   MyOAASPObj.DelTableRecord("students","id",id)
     set    MyOAASPObj=nothing	
	 
	 
	 response.redirect   "student.asp?years="&strYears&"&selgrade="&strGrade&"&selclass="&strClass
 %>



