notify.asp

时代购物系统 4.0功能升级说明 <1>完善了3.0的VIP

<!--#include file="conn.asp"-->
<%if session("admin")="" then
response.Write "<script language='javascript'>alert('请先登录！');history.go(-1);</script>"
response.End
end if
%>
<%
function HTMLEncode2(fString)
	fString = Replace(fString, CHR(13), "")
	fString = Replace(fString, CHR(10) & CHR(10), "</P><P>")
	fString = Replace(fString, CHR(10), "<BR>")
	HTMLEncode2 = fString
end function
dim action
action=request.QueryString("action")
select case action
case "savegongao" 
set rs=server.CreateObject("adodb.recordset")
rs.open "select notify from config",conn,1,3
rs("notify")=htmlencode2(trim(request("notify")))
rs.update
set rs=nothing
response.Write "<script language=javascript>alert('公告修改成功！');history.go(-1);</script>"
response.End
end select
%>
<title>更改首 页公告</title>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#6699cc" id="Table1">
  <tr> 
    <td height="16" bgcolor="#6699cc"> <div align="center"><font color="#FFFFFF">更改首 页公告</font></div></td>
  </tr>
  <tr> 
    <td height="200" bgcolor="#FFFFFF"> <form name="form1" method="post" action="notify.asp?action=savegongao" id="Form1">
        <div align="center"></div>
        <table width="80%" border="0" align="center" cellpadding="3" cellspacing="0" id="Table2">
          <tr> 
            <td> <div align="center"> 
                <textarea name="notify" cols="60" rows="10" id="Textarea1"><%set rs=server.CreateObject("adodb.recordset")
                rs.Open "select notify from config",conn,1,1
                response.Write trim(rs("notify"))
                rs.Close
                set rs=nothing
                %></textarea>
              </div></td>
          </tr>
          <tr> 
            <td height="20"> <div align="center"> 
                <input type="submit" name="Submit" value="提 交" id="Submit1">
                &nbsp;&nbsp; 
                <input type="reset" name="Submit2" value="恢 复" id="Reset1">
              </div></td>
          </tr>
        </table>
      </form></td>
  </tr>
</table>
<br>
<!--#include file="footer.asp"-->
</body>
</html>