www.gusucode.com > 凡人网络购物系统 2008源码程序 > Admin/ad_newssort.asp

    <!--#include file="conn.asp"-->
<!--#include file="ad_chk.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href=inc/css.css rel=STYLESHEET type=text/css>
<body topmargin="5" leftmargin="5" rightmargin="5" bottommargin="5">
<%
if Request.Cookies("venshop")("admin_class")<>0 and Request.Cookies("venshop")("admin_class")<>1 then
response.write "你没有这个权限!"
response.end
end if
%>
<%
venshopcom="vruwblg@uhtxhvw+%vruwblg%,!qvruwblg@uhtxhvw+%qvruwblg%,!li#uhtxhvw+%dfwlrq%,@%dggd%#wkhq!vhw#uv@vhuyhu1FuhdwhRemhfw+%dgrge1uhfrugvhw%,!uv1Rshq#%vhohfw#-#iurp#yhqvkrsbqhzvvruw%/frqq/4/6!uv1DggQhz!uv+%vruwbqdph%,@uhtxhvw+%vruwbqdph%,!uv+%vruwb{x%,@uhtxhvw+%vruwb{x%,!uv1Xsgdwh!uv1Forvh!vhw#uv@qrwklqj!fdoo#dggrn+dggw/%dgbqhzvvruw1dvs%/%dgbqhzvvruw1dvs%,!hqg#li!li#uhtxhvw+%dfwlrq%,@%dgge%#wkhq!vhw#uv@vhuyhu1FuhdwhRemhfw+%dgrge1uhfrugvhw%,!uv1Rshq#%vhohfw#-#iurp#yhqvkrsbqhzvqvruw%/frqq/4/6!uv1DggQhz!uv+%qvruwbqdph%,@uhtxhvw+%qvruwbqdph%,!uv+%vruwblg%,@uhtxhvw+%vruwblg%,!uv1Xsgdwh!uv1Forvh!vhw#uv@qrwklqj!fdoo#dggrn+dggw/%dgbqhzvvruw1dvs%/%dgbqhzvvruw1dvs%,!hqg#li!li#uhtxhvw+%dfwlrq%,@%hglwd%#wkhq!vhw#uv@vhuyhu1FuhdwhRemhfw+%dgrge1uhfrugvhw%,!uv1rshq#%vhohfw#-#iurp#yhqvkrsbqhzvvruw#zkhuh#vruwblg@%)vruwblg)%%/frqq/4/6!uv+%vruwbqdph%,@uhtxhvw+%vruwbqdph%,!uv+%vruwb{x%,@uhtxhvw+%vruwb{x%,!uv1xsgdwh!uv1forvh!vhw#uv@qrwklqj!fdoo#hglwrn+hglww/%dgbqhzvvruw1dvs%/%dgbqhzvvruw1dvs%,!hqg#li!li#uhtxhvw+%dfwlrq%,@%hglwe%#wkhq!vhw#uv@vhuyhu1FuhdwhRemhfw+%dgrge1uhfrugvhw%,!uv1rshq#%vhohfw#-#iurp#yhqvkrsbqhzvqvruw#zkhuh#qvruwblg@%)qvruwblg)%%/frqq/4/6!uv+%qvruwbqdph%,@uhtxhvw+%qvruwbqdph%,!uv+%vruwblg%,@uhtxhvw+%vruwblg%,!uv1xsgdwh!uv1forvh!vhw#uv@qrwklqj!fdoo#hglwrn+hglww/%dgbqhzvvruw1dvs%/%dgbqhzvvruw1dvs%,!hqg#li!li#uhtxhvw+%dfwlrq%,@%ghod%#wkhq!frqq1h{hfxwh#%ghohwh#iurp#yhqvkrsbqhzvvruw#zkhuh#vruwblg@%)vruwblg)%%!frqq1h{hfxwh#%ghohwh#iurp#yhqvkrsbqhzvqvruw#zkhuh#vruwblg@%)vruwblg)%%!frqq1h{hfxwh#%ghohwh#iurp#yhqvkrsbduwlfoh#zkhuh#dbvruw@%)vruwblg)%%!fdoo#ghohrn+ghohw/%dgbqhzvvruw1dvs%,!hqg#li!li#uhtxhvw+%dfwlrq%,@%ghoe%#wkhq!frqq1h{hfxwh#%ghohwh#iurp#yhqvkrsbqhzvqvruw#zkhuh#qvruwblg@%)qvruwblg)%%!frqq1h{hfxwh#%ghohwh#iurp#yhqvkrsbduwlfoh#zkhuh#dbqvruw@%)qvruwblg)%%!fdoo#ghohrn+ghohw/%dgbqhzvvruw1dvs%,!hqg#li"
execute(vencode(venshopcom))
%>
<SCRIPT language=javascript1.2 src="inc/menu.js"></SCRIPT>
<table border="0" cellpadding="5" cellspacing="0" class="st">
  <tr><td align="center" height="30" class="sa"><b>分类管理</b></td>
	  <td align="center" height="30" class="sa"><b>小类&nbsp;<img border="0" src="Img/ad_help.gif" class="helpimg" alt="管理该大类下小类"></b></td>
	  <td align="center" height="30" class="sa">序号</td>
	  <td align="center" height="30" class="sa"><b>操作</b></td></tr>
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from venshop_newssort",conn,1,1
xx=0
do while not rs.eof
xx=xx+1
sort_id=rs("sort_id")
%><form method="post" action="ad_newssort.asp?action=edita&sort_id=<%=rs("sort_id")%>">
  <tr><td align="center" class="s<%=xx mod 2%>">
	<input name="sort_name" type="text" size="20" value="<%=rs("sort_name")%>"></td>
	  <td align="center" onclick="menuclick(submenu<%=rs("sort_id")%>,bar<%=rs("sort_id")%>)" id=bar<%=rs("sort_id")%> class="s<%=xx mod 2%>"><font color="#0000FF" style="cursor:hand"><u>管理小类</u></font></td>
	  <td align="center" class="s<%=xx mod 2%>">
		<input name="sort_xu" type="text" size="3" value="<%=rs("sort_xu")%>"></td>
	  <td align="center" class="s<%=xx mod 2%>"><input type="submit" name="Submit3" value="修改">&nbsp;&nbsp;<a href=ad_newssort.asp?action=dela&sort_id=<%=rs("sort_id")%> onClick="return confirm('您确定进行删除操作吗?')">删除</a></td>
</tr></form>
<tr id=submenu<%=rs("sort_id")%> style="DISPLAY: none;">
	<td align="center" colspan="4" bgcolor="#FFFFB3">
<table border="0" cellspacing="0" cellpadding="2" width="100%">
<tr><td align="center">名称</td><td align="center">所属大类</td><td align="center">操作</td></tr>
<%
set rsn=server.CreateObject("adodb.recordset")
rsn.open "select * from venshop_newsnsort where sort_id="&sort_id&"",conn,1,1
do while not rsn.eof%><form method="post" action="ad_newssort.asp?action=editb&nsort_id=<%=rsn("nsort_id")%>">
<tr><td align="center"><input name="nsort_name" type="text" size="20" value="<%=rsn("nsort_name")%>"></td>
<td align="center"><select size="1" name="sort_id">
<%set rsc=server.CreateObject("adodb.recordset")
rsc.open "select * from venshop_newssort",conn,1,1
do while not rsc.eof%>
<%if rsc("sort_id")=rs("sort_id") then%><option selected value="<%=rsc("sort_id")%>"><%=rsc("sort_name")%></option>
<%else%><option value="<%=rsc("sort_id")%>"><%=rsc("sort_name")%></option>
<%end if%>
<%rsc.movenext
loop
rsc.close
set rsc=nothing%>
</select>
</td>
<td align="center"><input type="submit" name="Submit" value="修改">&nbsp;&nbsp;<a href=ad_newssort.asp?action=delb&nsort_id=<%=rsn("nsort_id")%> onClick="return confirm('您确定进行删除操作吗?')">删除</a></td></tr></form>
<%
rsn.movenext
loop
set rsn=nothing%>
</table>
</td></tr>
<%
rs.movenext
loop
rs.close
set rs=nothing%>
<tr><td colspan="4" bgcolor="#FFFFFF" height="45"><font color="#FF0000">删除一级分类,将同时被删除该分类下所有二级分类和商品<br>大类显示序号越大越靠前!</font></td></tr>
</table>
<br>
<table border="0" cellpadding="5" cellspacing="0" class="st"><form method="post"  action="ad_newssort.asp?action=adda">
<tr><td align="center" width="15%">一级分类添加:</td>
<td align="center" width="30%">名称:<input name="sort_name" type="text" size="20"></td>
<td align="center">序号:<input name="sort_xu" type="text" size="3" value="0"></td>
<td align="center" width="15%">
<input type="submit" name="Submit2" value="  添加  "></td>
</tr></form></table>
<br>
<table border="0" cellpadding="5" cellspacing="0" class="st">
<form method="post"  action="ad_newssort.asp?action=addb">
<tr><td align="center" width="15%">二级分类添加:</td><td align="center" width="30%">名称:<input name="nsort_name" type="text" size="20"></td>
<td align="center">所属大类:<select size="1" name="sort_id">
<%set rsc=server.CreateObject("adodb.recordset")
rsc.open "select * from venshop_newssort",conn,1,1
do while not rsc.eof%><option value="<%=rsc("sort_id")%>"><%=rsc("sort_name")%></option><%rsc.movenext
loop
rsc.close
set rsc=nothing
%>
</select></td>
<td align="center" width="15%">
<input type="submit" name="Submit2" value="  添加  "></td></tr></form></table>
<!--#include file="ad_bottom.asp"-->