<%@ codepage ="936" %>
<% 
	data_path="../../" 'ACC连接数据库路径，对SQL无效
	numid="no"
	dir="no"
  %>
  <!--#include file="../../conn/conn.asp"-->
  <!--#include file="../../inc/filesystem.asp"-->
 <!--#include file="../../inc/safe.asp"-->
   <!--#include file="../rolecheck.asp"-->
   <%
  
if request.form("id")="" then
Response.Redirect ("/login/chklogin.asp?login=4")
end if

 id=Replace_Text(request.form("id"))
 %>

<link rel="stylesheet" type="text/css" href="../css/style.css">
<%
if Not ChkPost then 
response.redirect ("/login/chklogin.asp?login=4")
response.end
end if

 
title=Replace_Text(request.form("title"))
TitleFontColor=request.form("TitleFontColor")
 
if TitleFontColor<>"" then
title="<font color="&TitleFontColor&">"&title&"</font>"
end if
typeid=Replace_Text(request.form("typeid"))
if Replace_Text(request.form("tj"))="" then
tj=0
else
tj=1
end if
oldpic=Replace_Text(request.form("oldpic"))
 picture=Replace_Text(request.form("picture"))
nfrom=Replace_Text(request.form("nfrom"))
content=request.form("content")
if content="" then
response.write"<SCRIPT language=JavaScript>alert('您没有填写详细内容，请返回重新填写！');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
end if
  set rs=server.CreateObject ("adodb.recordset")
sql="select * from Websen_worldec_about where id="&id&""
rs.open sql,conn,1,3
rs("title")=title
rs("typeid")=typeid
rs("tj")=tj
rs("nfrom")=nfrom
if Replace_Text(Request("cimg"))=1 then
   '删除新上传的而又不使用的图片^^^^^^^^^^^^^^^^^^ 
    if picture<>oldpic then
	if picture<>"nopicture.gif" then
   	 call FileDel(HOPE_InstallDir&"UploadFile/"&picture)
	 end if
 	end if
   '^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
   end if
  if Replace_Text(Request("cimg"))=2 then
     rs("picture")=picture
   '删除原有图片^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
    if picture<>oldpic then
	if oldpic<>"nopicture.gif" then
  	 call FileDel(HOPE_InstallDir&"UploadFile/"&oldpic)
	 end if
 	end if
   '^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
  end if
 
rs("content")=content
rs("dateandtime")=now()
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>操作成功</title>
</head>
<table cellpadding=2 cellspacing=1 border=0 width=400 class=tableBorder align=center><TR>
  <TH class=tableHeaderText colSpan=2 height=25>修改网站公告信息</TH>
<TR><tr><td height=85 valign=top class=forumRow><div align=center><br><br>
修改网站公告信息成功！</div></td></tr><tr align=center><td height=30 class=forumRowHighlight><a href='index.asp'>&lt;&lt; 返回上一页</a></td>
</tr></table>
</body>
</html>
<br>
<!--#include file="../copy.asp" -->