smxz.asp 云枫企业网站源代码第二版 2.0源码程序 - ASP源码程序

www.gusucode.com > 云枫企业网站源代码第二版 2.0源码程序 > admin/smxz.asp
    <!--#include file="conn.asp" -->
<!--#include file="inc/admin.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<style type="text/css">
<!--
body,td,th {
	font-size: 12px;
	color: #000000;
}
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
a {
	font-size: 12px;
}
a:link {
	text-decoration: none;
}
a:visited {
	text-decoration: none;
}
a:hover {
	text-decoration: none;
}
a:active {
	text-decoration: none;
}
-->
</style></head>

<body>
<% dim sql,sm,lm
	lm=request("lm")
	if lm="" then
		'response.Write(lm)
		response.Redirect("admin.asp")
	end if
	'on error resume next
	sm=request("sm_content")
	set rs=server.CreateObject("adodb.recordset")
	rs.open "select * from hy where classname='" & trim(lm) & "'",conn,1,3
	if not sm="" then
		rs("sm")=sm
		rs.update
	end if
%>
<form name="form1" method="post" action="smxz.asp?lm=<%=lm%>">
  <table width="560" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#6699CC">
    <tr> 
      <td bgcolor="#6699CC">
<div align="center"><font color="#ffffff" size="3"><strong><%=lm%>编辑管理</strong></font></div></td>
    </tr>
    <tr> 
      <td bgcolor="#FFFFFF">
<div align="center">
          <textarea name="sm_content" style="display:none" id="sm_content" cols="85" rows="12" class="textarea"><% =rs("sm")%></textarea>
          <iframe id="ewebeditor" src="eWebEditor/eWebEditor.asp?id=sm_content" frameborder="0" scrolling="no" width="550" height="350"></iframe>
        </div></td>
    </tr>
    <tr> 
      <td><div align="center">
          <input type="submit" name="Submit" value=" 提 交 ">
        </div></td>
    </tr>
  </table>

           
</form>
<% 
	rs.close
	set rs=nothing
%>
</body>
</html>