栏目管理_SUPERCMS文章管理系统--力争做国内最好最实用的文章管理系统！

文章栏目管理

<%if request("action")<>"" then%> <%typeids=request("typeid")%> <%else%> <%end if%> <%if request("order")<>"" then%> <%typeids=request("typeid")%> <%else%> <%end if%>

栏目添加：系统自动生成文件夹，该文件夹可以自定义

栏目名称: 文件夹: 　　　
　

<% Set rst= Server.CreateObject("ADODB.Recordset") rst.open "select * from type order by typeid",conn,1,1 if rst.EOF then response.write "没有栏目" else %> <%do while NOT rst.EOF%> <% i=i+1 if i mod 4 =0 then response.write "" end if if i>=50 then exit do rst.MoveNext loop end if rst.close %>

&action=edit"><%=rst("typename")%>[<%=rst("typedir")%>]

栏目修改：栏目修改，支持文件夹自由更改，完全由自己掌控

栏目删除：删除为不可逆操作，该操作将自动清除该文件夹中的所有数据

导航栏设置：点击相应栏目名称，可自主设置栏目在导航栏中的显示状态和次序

导航栏效果：

<% Set rsn= Server.CreateObject("ADODB.Recordset") rsn.open "select * from type where nchecked='1' order by id",conn,1,1 if rsn.EOF then response.write "没有栏目" else %> <%do while NOT rsn.EOF%>

" target=_blank><%=rsn("typename")%> <% if i>=50 then exit do rsn.MoveNext loop end if rsn.close %>

* 1 表示状态为"显示";　0 表示状态为"隐藏"

<% sql2="select * from type where typeid="&typeids set rs2=server.createobject("adodb.recordset") rs2.open sql2,conn,1,1 %>