<!-- #include file="conn.asp" -->
<!-- #include file="cookies.asp" -->
<%
'-----------------------------------------------------------------
if request.Form("action")="mod_content" then
dim rs,sql
set rs=server.createobject("adodb.recordset")
sql="update web_info set web_content='"&trim(request.Form("web_content"))&"'"
conn.execute sql
if err.Number<>0 then
err.clear
response.write "更 新 失 败 !<br>"
end if
End if
'----------------------------------------------------------------
			set rs=server.createobject("adodb.recordset")
		    sql="select * from web_info"
			rs.open sql,conn,1,1
%>
<html>
<head>
<title>管理分类</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="style.css" type="text/css">
</head>

<body bgcolor="#FFFFFF" text="#000000" background="blue.gif">
<div align="center">
  <p>&nbsp;</p>
  <table width="96%"  border="0" cellpadding="10" cellspacing="1" bgcolor="#000066">
    <form name="form2" method="post" action="">
      <tr bgcolor="#FFCC33">
        <td>&nbsp;&nbsp;修改首页公告<strong></strong></td>
      </tr>
      <tr bgcolor="#FDFEF5">
        <td align="center" bgcolor="#FDFEF5"><br>
          <textarea name="web_content" cols="80"><%=rs("web_content")%></textarea> 
          <br>
          <br>
          <input type="Submit" name="Submit2" value="&nbsp;&nbsp;&nbsp;&nbsp;确&nbsp;&nbsp;认&nbsp;&nbsp;修&nbsp;&nbsp;改&nbsp;&nbsp;&nbsp;&nbsp;">
		<input type="hidden" name="action" value="mod_content"> <br>
		<br></td>
      </tr>
    </form>
  </table>
  <p>&nbsp;</p>
</div>
</body>
</html>
<%
rs.Close()
Set rs = Nothing
%>