<!--#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="../images/<%=request.cookies("imgdir")%>/css/style.css" media="all"/>
</head>
<body  topmargin="5" leftmargin="5">

<p>
<%
Set Upload=Server.createobject("Persits.Upload.1") 
uploadlimitsize=request.cookies("filelength")                             '改变这个设置可以改变上传文件的大小限制，单位兆。
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 " 你上传的文件超过限制（"& uploadlimitsize &"兆）<a href=""javascript:history.go(-1)"">重新上传</a>" 
response.end 
end if 




 
			id=Upload.Form("id").value
			curpage=Upload.Form("curpage").value
			title=Upload.Form("title").value
			RiZhitype=Upload.Form("RiZhitype").value
			content=Upload.Form("content").value
			
			
 


			
			set rszhuti=server.createobject("adodb.recordset")
			rszhutisql="select * from GongZuoRiZhi where id='"&id& "'" 
			
			rszhuti.open rszhutisql,conn,1,3
			
			rszhuti("RiZhitype")=RiZhitype
			rszhuti("title")=title
			rszhuti("updatetime")=strdate
			rszhuti("content")=content
			rszhuti("updatetime")=now()
			rszhuti("Tname")=request.cookies("tname")
			strip=Request.ServerVariables("REMOTE_ADDR")
			rszhuti("upip")=strip
			rszhuti("hits")="0"
			rszhuti.update
			rszhuti.close


		    Upload.Dispose ' 释放内存 
		    Set Upload = Nothing 
			
            response.redirect   "MyRiZhi.asp?curpage="&curpage

%>

 
</body>  
  
</html>  


