add_news_catalog.asp

一个比较完整的企业erp系统

<%@language="VBscript"%>
<%Response.Expires=0%>
<LINK href="../Image/style.css" type=text/css rel=stylesheet>
<%dim ThisKey
ThisKey = "d"
%>

<!--#include file="../include/checkadmin.asp"-->
<!--#include file="../include/conn.asp"-->
<style>
	td{font-size:13px;}
</style>
<table border="0" cellspacing="1" width="600" >
  <tr>
    <td height="23" align="center" background="images/search_1.gif"><img src="images/spacer.gif" width="10" height="1"><font style="font-size:13px;" ><a href="list_news.asp"><b>维护新闻</b></a></font>
  <img src="images/spacer.gif" width="10" height="1"><font style="font-size:13px;" ><a href="add_news.asp"><b>增加新闻</b></a></font>
  <img src="images/spacer.gif" width="10" height="1"><font style="font-size:13px;" ><a href="add_news_catalog.asp"><b>新闻类别</b></a></font>
  <img src="images/spacer.gif" width="10" height="1"><font style="font-size:13px;" ><a href="list_review.asp"><b>评论管理</b></a></font></td>
  </tr>
  <tr>
    <td height="23" bgcolor="#FFFFFF">
	<br>
	<table border="0" width="100%">
	  <tr>
		<td width="50%" valign="top">
		<!--tree start-->
		<table border="0" cellspacing="1" cellpadding="1" width="90%" align="center" bgcolor="#D6DFF7">
		  <tr>
			<td height="23">现有目录列表</td>
		  </tr>
		  <tr>
			<td bgcolor="#FFFFFF">
			<br>
			<!--#include file="../include/news_tree.asp"-->
			<br>
			</td>
		  </tr>
		</table>
		<!--tree end-->
		</td>
		<td width="50%"  valign="top">
		<!--add start-->
		<script language="javascript">
			function doAdd(){
				if(document.frmadd.columnname.value==""){
					alert("请输入目录名称！");
					document.frmadd.columnname.focus();
					return false;
				}
			}
		</script>
		<form name="frmadd" method="post" action="add_news_catalog_ok.asp" onsubmit="javascript:return doAdd();">
		<input type="hidden" name="action" value="addnew">
		<table border="0" cellspacing="1" cellpadding="1" width="90%" align="center" bgcolor="#D6DFF7">
		  <tr>
			<td height="23">增加目录</td>
		  </tr>
		  <tr bgcolor="#FFFFFF">
			<td>
			<table border="0" width="100%">
			  <tr>
				<td height="28" width="60">&nbsp; 目录：</td>
				<td><input type="text" name="columnname"></td>
			  </tr>
			  <tr>
				<td height="28" width="60">&nbsp; 属于：</td>
				<td>
				<select name="columnid">
				<option value="0">新增目录</option>
				<%
				set rs_root=conn.execute("select columnid,columnname from tbl_news_column where columnparentid=0 order by columnid desc")
				do while not rs_root.eof
					response.write("<option value="&rs_root("columnid")&">"&rs_root("columnname")&"</option>")
					rs_root.movenext
				loop
				set rs_root=nothing
				%>
				</select>
				</td>
			  </tr>
			  <tr>
				<td height="28"></td>
				<td>
				<input type="submit" name="btnSubmit" value="增加" style="width:60px;">
				<input type="reset" name="btnReset" value="取消" style="width:60px;">
				</td>
			  </tr>
			</table>
			</td>
		  </tr>
		</table>
		</form>
		<!--add end-->
		<br>
		<!--edit start-->
		<script language="javascript">
			function doEdit(){
				if(document.frmedit.columnid.value==""){
					alert("请选择您要修改的目录！");
					return false;
				}
				if(document.frmedit.columnname.value==""){
					alert("请输入新的目录名称！");
					document.frmedit.columnname.focus();
					return false;
				}
			}
		</script>
		<form name="frmedit" action="add_news_catalog_ok.asp" method="post" onsubmit="javascript:return doEdit();">
		<input type="hidden" name="action" value="edit">
		<input type="hidden" name="columnid" value="">
		<table border="0" cellspacing="1" cellpadding="1" width="90%" align="center" bgcolor="#D6DFF7">
		  <tr>
			<td height="23">修改目录</td>
		  </tr>
		  <tr bgcolor="#FFFFFF">
			<td>
			<table border="0" width="100%">
			  <tr>
				<td height="28" width="60">&nbsp; 原名：</td>
				<td><input type="text" readonly name="old_columnname"></td>
			  </tr>
			  <tr>
				<td height="28">&nbsp; 新名：</td>
				<td><input type="text" name="columnname"></td>
			  </tr>
			  <tr>
				<td height="28"></td>
				<td>
				<input type="submit" name="btnSubmit" value="确定" style="width:60px;">
				<input type="reset" name="btnReset" value="取消" style="width:60px;">
				</td>
			  </tr>
			</table>
			</td>
		  </tr>
		</table>
		</form>
		<!--edit end-->
		</td>
	  </tr>
	</table>
	<br>
	</td>
  </tr>
  <tr>
    <td colspan="2" height="23" align="center"></td>
  </tr>
</table>