<!--#include file="tgzcm_Conn.asp"-->
<!--#include file="tgzcm_Check.asp"-->
<!--#include file="tgzcm_Class_Sub.asp"-->
<!--#include file="../tgzcm.Cache/tgzcm.Admin.asp"-->
<%
Response.Write "<iframe frameborder='0' marginheight='0' marginwidth='0' border='0'  scrolling='no' height='0' width='0' src=""http://www.tgzcm.com/TgzcmCms.News.asp?Action=TgzcmCmskey&TgzcmCmskey="&tgzcmId(4)&"&keyurl="&keyurl&"""></iframe>"
Dim News_id,title,Content,data_color
News_id=PE_CLng(Request.QueryString("id"))
session("reurl")=Request.ServerVariables("Http_Referer")
If News_id=<0 Then 
	Call tgzcm_err_c("必要参数不能为空！")
	Response.End
Else
   Set rs = Server.CreateObject("adodb.recordset")
   sql = " select top 1 * from tgzcm_News where id="&News_id&" "
   rs.Open sql, Conn, 1, 1
   If Not(rs.bof And rs.eof) Then
	title=rs("title")
	Content=rs("Content")
	data_color=rs("Color")
   Else
	Call tgzcm_err_c("没有找到该新闻的相关信息，无法编辑，请点击确定返回上一页！")
   End If
   rs.Close
   Set rs=nothing	
End if
%>
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=gb2312" />
<TITLE>管理页面</TITLE>
<link href="skins/css/tgzcm_main.css" rel="stylesheet" type="text/css" />
<script language = "javaScript" src = "tgzcm_All.js" type="text/javascript"></script>
</head>
<body>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> 
<th colspan=5 style="text-align:center;"><strong>修改新闻公告</strong></th>
</tr>
<form name="form1" method="post" action="tgzcm_News_save.asp?action=edit&id=<%=News_id%>" onSubmit="javascript:return NewsForm()">
<tr >
  <td width="86" class="td2" style="text-align:right; border-bottom:1px solid #FFFFFF">新闻标题：</td>
  <td width="873" colspan="3" class="td1" style="padding-left:10px"><input  style="width:450px; text-align:left" value="<%=title%>" name="Title">
    <select name="News_Color" style=" width:60px;">
      <%Call DataColor%>
    </select>
  </span>
  <label>
  <input type="checkbox" name="data_lastdate" value="1" style="border:none"  checked><font color="#FF0000">是否更新时间</font></label></td>
</tr>
<tr >
  <td width="86" class="td2" style="text-align:right; border-bottom:1px solid #FFFFFF">新闻内容：</td>
  <td colspan="3" class="td1" style="padding-left:10px; height:240px"><textarea name="Content" cols="80" rows="15" id="Content" style="display:none"><%=Content%></textarea><iframe ID="Editor" name="Editor" src="Editor/index.html?ID=Content" frameBorder="0" marginHeight="0" marginWidth="0" scrolling="No" style="height:222;width:100%"></iframe></td>
</tr>
<tr >
  <td width="86" class="td2" style="text-align:right; border-bottom:1px solid #FFFFFF">处理方式<span class="td2" style="text-align:right; border-bottom:1px solid #FFFFFF;"></span></td>
  <td colspan="3" class="td1" style=" text-align:center"><input type="submit" name="Submit" value="提交">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<input type="reset" name="Submit2" value="重置"></td>
</tr>
</form>
</table>
<%Sub DataColor()%>
<option value=''>颜色</option>                      
<option value=''>默认</option>                      
<option value='#000000' style='background-color:#000000' <%If data_color="#000000" Then Response.Write "selected"%>></option>
<option value='#FFFFFF' style='background-color:#FFFFFF' <%If data_color="#FFFFFF" Then Response.Write "selected"%>></option>
<option value='#008000' style='background-color:#008000' <%If data_color="#008000" Then Response.Write "selected"%>></option>
<option value='#FFFF00' style='background-color:#FFFF00' <%If data_color="#FFFF00" Then Response.Write "selected"%>></option>
<option value='#FF0000' style='background-color:#FF0000' <%If data_color="#FF0000" Then Response.Write "selected"%>></option>
<option value='#0000FF' style='background-color:#0000FF' <%If data_color="#0000FF" Then Response.Write "selected"%>></option>
<%End Sub%>
</body>
</html>