<!--#include file="../checkLogin.asp"-->
<!--#include file="../SQLconn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>保存文件</title>
<link rel="stylesheet" type="text/css" href="style.css" />
</head>
<body  topmargin="5" leftmargin="5">

<p>
<%
Set Upload=Server.createobject("Persits.Upload.1") 
uploadlimitsize=0.3                          '改变这个设置可以改变上传文件的大小限制，单位兆。
Upload.SetMaxSize uploadlimitsize*1024*1024, True 
Upload.Save  
if err.number <> 0 then 
response.write  "出现错误: " & err.number & "、" & err.description &"" 
end if 
if err.number = 8 then 
response.write "<br><br><br><br><div align=""center"">保存数据失败!<br><br> 你上传的相片文件超过300K限制，请处理好相片再重新报名!<br><br>可以用画图工具截图，或者ＱＱ截图后保存等等方法把文件变小！</div>" 
response.end 
end if 

            id=Upload.Form("id").value
			 
			
			gwzw=Upload.Form("gwzw").value
			rkqk=Upload.Form("rkqk").value
			qtgz=Upload.Form("qtgz").value
			kqqk=Upload.Form("kqqk").value
			sxqpjf=Upload.Form("sxqpjf").value
			sxqdb=Upload.Form("sxqdb").value
			sdbqk=Upload.Form("sdbqk").value
			
			xxqpjf=Upload.Form("xxqpjf").value
			xxqdb=Upload.Form("xxqdb").value
			xdbqk=Upload.Form("xdbqk").value
			ktmc=Upload.Form("ktmc").value
			ktmc=Upload.Form("ktmc").value
			ktjb=Upload.Form("ktjb").value		
			grry=Upload.Form("grry").value		
			ndkh=Upload.Form("ndkh").value
			jyhj=Upload.Form("jyhj").value
			zdxshj=Upload.Form("zdxshj").value			
			jxjy=Upload.Form("jxjy").value
			gzbx=Upload.Form("gzbx").value
					
		
					

			set RsSave=server.createobject("adodb.recordset")
			RsSavesql="select * from RenShiYeWu where   id='"&id& "'"
			RsSave.open RsSavesql,conn,1,3
	
						
					 	
					 
					RsSave("岗位职务")=gwzw
					RsSave("任课情况")=rkqk
					RsSave("其他工作")=qtgz
					RsSave("考勤情况")=kqqk
					RsSave("上学期平均分")=sxqpjf
					RsSave("上学期对比区线")=sxqdb
					RsSave("上学期达标情况")=sdbqk
					
					RsSave("下学期平均分")=xxqpjf
					RsSave("下学期对比区线")=xxqdb
					RsSave("下学期达标情况")=xdbqk
					RsSave("课题名称")=ktmc			
					RsSave("课题级别")=ktmc			
					RsSave("个人荣誉")=grry									
					RsSave("年度考核")=ndkh
					RsSave("教育获奖")=jyhj
					RsSave("指导学生获奖")=zdxshj
					RsSave("继续教育")=jxjy
					
					RsSave("工作表现")=gzbx
					
					RsSave("填报人")=request.cookies("tname")										 
					RsSave("填报日期")=now()
					RsSave("填报IP")=Request.ServerVariables("REMOTE_ADDR")
					
						 
					RsSave.update
					Upload.Dispose ' 释放内存 
	            	Set Upload = Nothing 
					%>
					
					<br><br><br><br><br><br>
					<table width="50%" border="0" align="center" bgcolor="#E4F3F8" class="mtable">
					  <tr>
						<td height="222"><p>&nbsp;</p>
						<p>&nbsp;</p>
						<p>&nbsp;</p>
						<div align="center">保存成功！</div>
						<p>&nbsp;</p>
						<p>&nbsp;</p>
						<p>&nbsp;</p></td>
					  </tr>
					</table>
					
					
			 
			
		 



</body>  
  
</html>  




 