manage_editaffiche.asp

来自「网站的后台管理代码......内容比较全面....新手比较适合」· ASP 代码 · 共 77 行

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../inc/adconn.asp"-->
<!--#include file="../css.asp"-->
<%
if session("admin_name")="" then 
response.end
end if%>
<%if Request.QueryString("mark")="southidc" then

id=request("id")
Title=request("Title")
Content=Request("Content")

If Title="" Then
response.write "SORRY <br>"
response.write "请输入公告标题"
response.end
end if

If Content="" Then
response.write "SORRY <br>"
response.write "公告内容不能为空"
response.end
end if

Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from Affiche where id="&id
rs.open sql,conn,1,3

rs("Title")=Title
rs("Content")=Content
rs.update
rs.close
response.redirect "Manage_AddAffiche.asp"
end if
%>
<%
id=request.querystring("id")
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From Affiche where id="&id, conn,3,3
%>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
  <tr> 
    <td align="center" valign="top"> <br> <strong><br>
      </strong> <br> <br> <table width="716" border="1" cellpadding="2" cellspacing="1" bordercolor="#999999" class="table_southidc">
        <tr> 
          <td width="709" height="25" background="../images/pics/tile_sub.gif" class="back_southidc">&gt;&gt;修改网站公告</td>
        </tr>
        <tr> 
          <form method="post" action="Manage_editAffiche.asp?mark=southidc">
            <input type=hidden name=id value=<%=id%>>
            <td><div align="center"> 
                <table width="100%" border="1" cellpadding="0" cellspacing="1" bordercolor="#999999" bgcolor="#ECF5FF">
                  <tr> 
                    <td width="27%" height="25" bgcolor="#A4B6D7"> <div align="center">公告标题:</div></td>
                    <td width="73%"> <input name="Title" type="text" id="Title" value="<%=rs("Title")%>" size="80" maxlength="100"> 
                    </td>
                  </tr>
                  <tr> 
                    <td height="22" bgcolor="#A4B6D7"> <div align="center">公告内容:</div></td>
                    <td><textarea rows="8" name="Content" cols="80"><%=rs("Content")%></textarea> 
                    </td>
                  </tr>
                  <tr> 
                    <td height="25" colspan="2" bgcolor="#E3E3E3"> <div align="center"> 
                        <input name="submit" type="submit" value="确定">
                        &nbsp; 
                        <input name="reset" type="reset" value="从来">
                      </div></td>
                  </tr>
                </table>
              </div></td>
          </form>
        </tr>
      </table></td>
  </tr>
</table>