<!--#include file="../checkLogin.asp"-->
<!--#include file="../SQLconn.asp"-->
<% 
    strid=request("id")
    pi=request("pi")
	yijian=request("yijian")
	radiobutton=request("radiobutton")
	
	tname=request.cookies("tname") 
    bumen=request("bumen")
	
	
   
   set Rsqingjia=server.createobject("adodb.recordset")
       Rsqingjiasql="select * from KaoQinQingJia where  id='"&strId& "'"
       Rsqingjia.open Rsqingjiasql,conn,1,3

	  
		if radiobutton="完成审批" then
			 Rsqingjia("审批结果")=pi
		end if
		
		if bumen="校长" then
			 Rsqingjia("审批结果")=pi
		end if
		
		if pi="批准"  and    radiobutton="待教导处审批" then
			 Rsqingjia("教导处审批状态")="等待审批"
		end if
		if  pi="批准"  and   radiobutton="待校长审批" then
			 Rsqingjia("校长审批状态")="等待审批"
		end if
		
		
		if  pi="不批准"  then
		    Rsqingjia("审批结果")=pi
		end if

	
	
	 
	 
	 if bumen="级部" then
	   Rsqingjia("审批人")=tname
	   Rsqingjia("审批日期")=now()
	   Rsqingjia("审批电脑")=Request.ServerVariables("REMOTE_ADDR")
	   Rsqingjia("审批意见")=yijian
	   Rsqingjia("审批状态")=pi
	   
	   
     end if
	 
	if bumen="教导处" then
	   Rsqingjia("教导处审批人")=tname
	   Rsqingjia("教导处审批状态")=pi
	   Rsqingjia("教导处审批时间")=now()
	   Rsqingjia("审批电脑")=Request.ServerVariables("REMOTE_ADDR")
	   Rsqingjia("教导处审批意见")=yijian
     end if
	 
	 if bumen="校长" then
	   Rsqingjia("校长审批人")=tname
	   Rsqingjia("校长审批状态")=pi 
	   Rsqingjia("校长审批时间")=now()
	   Rsqingjia("审批电脑")=Request.ServerVariables("REMOTE_ADDR")
	   Rsqingjia("校长审批意见")=yijian
     end if
	 
	 
	 
	 
	  
       Rsqingjia.update
       Rsqingjia.close
	   response.redirect   "QingJiaShenPi.asp"
%>

<%=radiobutton%>