admin_news_pl_view.asp

迅时后台可以 对新闻栏目进行管理

<!--#include file = admin_conn.asp -->
<STYLE type="text/css">
<!--
a:link       {text-decoration: none; font-family: AdobeSm; color: #000000 }
a:visited    {text-decoration: none; color: #000000 }
A:hover      {COLOR: green; FONT-FAMILY: "宋体,MingLiU"; TEXT-DECORATION: underline}
body         {font-size: 9pt; font-family: 宋体,MingLiU, Arial;color: #000000}
TD           {FONT-SIZE: 9pt; FONT-FAMILY: "宋体,MingLiU, Arial";color: #000000;table-layout:fixed;word-break:break-all}
p            {FONT-SIZE: 9pt; FONT-FAMILY: "宋体,MingLiU, Arial";color: #000000}
input        {FONT-SIZE: 9pt; FONT-FAMILY: "宋体,MingLiU, Arial";color: #000000}
body         {margin-top: 0; margin-bottom: 0;margin-left:0;margin-right:0; color: #000000}
select       {FONT-SIZE: 9PT;}
option       {FONT-SIZE: 9pt;}
textarea     {FONT-SIZE: 9pt;}
-->
</STYLE>
<SCRIPT LANGUAGE="JavaScript">
function f_frameStyleResize(targObj){
 var targWin = targObj.parent.document.all[targObj.name];
 if(targWin != null) {
  var HeightValue = targObj.document.body.scrollHeight
  if(HeightValue < 10 ){HeightValue = 10} 
  targWin.style.pixelHeight = HeightValue;
 }
}
function f_iframeResize(){
 bLoadComplete = true; f_frameStyleResize(self);
}
var bLoadComplete = false;
window.onload = f_iframeResize;
</SCRIPT>
<title>查看评论</title>
<%
id=trim(request("id"))
action=trim(request("action"))
editcontent=trim(request("editcontent"))


if id="" then
	Response.Write "<table border=0><tr><td height=25>　</td></tr></table>"
	Response.end
end if
if action="save" and id<>"" and editcontent<>"" then
	conn.Execute "update [newspl] set [content]='"&editcontent&"' where id="&clng(id)
end if

sql = "select * from newspl where id="&clng(ID)
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,1

content=rs("content")

rs.close
set rs=nothing
conn.close
set conn=nothing
%><div align="center">
	<table border="0" cellpadding="20" cellspacing="0" width="100%" id="table1" height="100%">
		<!--webbot BOT="GeneratedScript" PREVIEW=" " startspan --><script Language="JavaScript" Type="text/javascript"><!--
function FrontPage_Form1_Validator(theForm)
{

  if (theForm.editcontent.value == "")
  {
    alert("请在 评论内容 域中输入值。");
    theForm.editcontent.focus();
    return (false);
  }

  if (theForm.editcontent.value.length < 1)
  {
    alert("在 评论内容 域中，请至少输入 1 个字符。");
    theForm.editcontent.focus();
    return (false);
  }
  return (true);
}
//--></script><!--webbot BOT="GeneratedScript" endspan --><form method="POST" action="admin_news_pl_view.asp?action=save&id=<%=id%>" name="FrontPage_Form1" onsubmit="return FrontPage_Form1_Validator(this)" language="JavaScript">
<tr>
			<td align=center>
				&nbsp;<!--webbot bot="Validation" s-display-name="评论内容" b-value-required="TRUE" i-minimum-length="1" --><textarea rows="7" name="editcontent" cols="98"><%=content%></textarea><br>
				<input type="submit" value="　　修改保存　　" name="B1"> <input type='button' value='关闭' onclick="javascript:location.href='?gb=1'">
			
			</td>
		</tr></form>
	</table>
</div>