
<%
    Grade = TRIM( Request( "grade" ) )
  	xueqi = TRIM( Request( "xueqi" ) )
	subject = TRIM( Request( "subject" ) )
	ftype = TRIM( Request( "ftype" ) )
  	title = TRIM( Request( "title" ) )
	guanjianci = TRIM( Request( "guanjianci" ) )
	 
    strId=request("id")
   
   
          Set MyOAASPObj = Server.CreateObject("YFSchoolOApro.YFSchoolDll")
         call MyOAASPObj.DelTableRecord("subject","id",strID)
         set  MyOAASPObj=nothing	
   
   
   response.redirect   "find.asp?Grade="&Grade&"&xueqi="&xueqi&"&subject="&subject&"&ftype="&ftype&"&title="&title&"&guanjianci="&guanjianci
 %>
 