<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<!--#include file="seeion.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=site_info("title")%>-后台管理系统</title>
<link href="css.css" rel="stylesheet" type="text/css" />
</head>
<body>
    <table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
        <td><table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td width="52"><img src="images/main_1.jpg" width="52" height="55" /></td>
              <td background="images/main_2.jpg" class="title1">修改新闻</td>
              <td width="52"><img src="images/main_3.jpg" width="52" height="55" /></td>
            </tr>
        </table></td>
      </tr>
      <tr>
        <td><table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td width="15" background="images/main_4.gif">&nbsp;</td>
              <td background="images/main_9.gif"><table width="99%" border="0" align="center" cellpadding="0" cellspacing="1" class="table">
                <%
Set rs = server.CreateObject("adodb.recordset")
exec = "select * from news where id="& request.QueryString("id")
rs.Open exec, conn, 1, 1
%>
                <form action="news_update_pass.asp" method="post" name="news_update" id="news_update">
                  <tr>
                    <th width="80" class="td">新闻标题：</th>
                    <td class="td"><input name="id" type="hidden" value="<%=request.querystring("id")%>" />
                        <input name="title" type="text" class="input" value="<%=rs("title")%>" size="50" /></td>
                  </tr>
                  <tr>
                    <th class="td">所属分类：</th>
                    <td class="td"><select name="category">
                        <%
Dim rsc
Set rsc = server.CreateObject("adodb.recordset")
rsc.Open "select * from news_class", conn, 1, 1
While Not rsc.EOF
    If rs("category") = rsc("id") Then
        response.Write("<option value=""" & rsc("id") & """ selected>" & rsc("title") & "</option>")
    Else
        response.Write("<option value=""" & rsc("id") & """>" & rsc("title") & "</option>")
    End If
    rsc.movenext
Wend
rsc.Close
Set rsc = Nothing

%>
                    </select></td>
                  </tr>
                  <tr>
                    <th class="td">新闻关键词：</th>
                    <td class="td"><input name="keywords" type="text" class="input" value="<%=rs("keywords")%>" size="50" /></td>
                  </tr>
                  <tr>
                    <th class="td">关键词描述：</th>
                    <td class="td"><input name="description" type="text" class="input" value="<%=rs("description")%>" size="50" /></td>
                  </tr>
                  <tr>
                    <th class="td">作者：</th>
                    <td class="td"><input name="author" type="text" class="input" value="<%=rs("author")%>" /></td>
                  </tr>
                  <tr>
                    <th class="td">来源：</th>
                    <td class="td"><input name="source" type="text" class="input" value="<%=rs("source")%>" /></td>
                  </tr>
                  <tr>
                    <th class="td">详细内容：</th>
                    <td class="td"><input type="hidden" name="body" value='<%=replace(rs("body"),"'","&#39;")%>'/>
                        <iframe id="eWebEditor1" src="ewebeditor/ewebeditor.htm?id=body&amp;style=pcfinal" frameborder="0" scrolling="No" width="753" height="400"></iframe></td>
                  </tr>
                  <tr>
                    <th class="td">新闻推荐：</th>
                    <td class="td"><input name="recommendatory" type="radio" value="1" <%if rs("recommendatory")=1 then%>checked="checked"<%end if%> />
                      推荐
                      <input name="recommendatory" type="radio" value="0" <%if rs("recommendatory")=0 then%>checked="checked"<%end if%>/>
                      不推荐</td>
                  </tr>
                  <tr>
                    <td class="td"><p class="submit">&nbsp;</p></td>
                    <td class="td"><span class="submit">
                      <input name="submit" type="submit" class="button" value="确认修改" />
                    </span></td>
                  </tr>
                </form>
              </table></td>
              <td width="15" background="images/main_5.gif">&nbsp;</td>
            </tr>
        </table></td>
      </tr>
      <tr>
        <td><table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td width="52"><img src="images/main_6.gif" width="52" height="16" /></td>
              <td background="images/main_7.gif" width="100%"></td>
              <td width="52"><img src="images/main_8.gif" width="52" height="16" /></td>
            </tr>
        </table></td>
      </tr>
    </table>
</body>
</html>

