manage_main4.asp

来自「增添网站节日气氛」· ASP 代码 · 共 54 行

<!--#include file="conn.asp"-->
<!--#include file="admin.asp"-->

<%if Request.QueryString("mark")="southidc" then
set rs=server.createobject("adodb.recordset")
sql="select * from main"
rs.open sql,conn,3,3
for i = 1 to Request.Form("Contact").count
	content = content & Request.Form("Contact")(i)
next
rs("Contact")=content
rs.update
rs.close
response.redirect "Manage_Main4.asp"
end if
sql="select * from main"
Set rs_home= Server.CreateObject("ADODB.Recordset")
rs_home.open sql,conn,1,1
%>
<!-- #include file="Inc/Head.asp" -->
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
  <tr> 
    <td align="center" valign="top"> <br> <strong><br>
      </strong> <table width="560" border="0" cellpadding="2" cellspacing="1">
        <tr> 
          <form method="POST" action="Manage_Main4.asp?mark=southidc">
            <td><table width="100%" border="0" cellpadding="4" cellspacing="1" class="table_southidc">
                <tr> 
                  <td height="25" align="center" class="back_southidc"><strong>联系我们</strong></td>
                </tr>
                <tr> 
                  <td height="300" align="center" class="td_southidc"><div align="left"> 
				<INPUT type="hidden" name="Contact" value="<% = Server.HtmlEncode(rs_home("Contact")) %>">	
                  <iframe ID="Contact" src="eWebEditor/eWebEditor.asp?id=Contact" frameborder="0" scrolling="no" width="550" HEIGHT="350"></iframe>  
              </div></td>
                </tr>
                <tr> 
                  <td class="td_southidc" height="30"> 
                    <div align="center"> 
                      <input type="submit" value=" 修 改 "
name="cmdok">
                      &nbsp; 
                      <input type="reset" value=" 重 写 "
name="cmdcancel">
                    </div></td>
                </tr>
              </table></td>
          </form>
        </tr>
      </table>
      <strong> </strong></td>
  </tr>
</table>
<!-- #include file="Inc/Foot.asp" -->