| 类别管理（添加一级分类） |
| 类别列表 |
查看信息 |
添加时间 |
分类排序 |
操作 |
<%Set rsbig=Server.Createobject("Adodb.Recordset")
sql="select * from nbclass order by nb_order asc"
rsbig.open sql,conn,1,3
if rsbig.eof then response.Write("")
do while not rsbig.eof%>
 <%=rsbig("nb_name")%> <%if rsbig("Fileurl")<>"" then%>[图]<%end if%> |
">[查看] |
<%=formatdatetime(rsbig("nb_wtime"),2)%> |
<%=rsbig("nb_order")%> |
">[添加分类] ">[修改] " onClick="return Delbig();">[删除] |
<%Set rssmall=Server.Createobject("Adodb.Recordset")
sql="select * from nsclass where nb_id="&rsbig("nb_id")&" order by ns_order asc"
rssmall.open sql,conn,1,3
if rssmall.eof then response.Write("")
do while not rssmall.eof%>
 <%=rssmall("ns_name")%> <%if rssmall("Fileurl")<>"" then%>[图]<%end if%> |
&Sid=<%=rssmall("ns_id")%>">[查看] |
<%=formatdatetime(rssmall("ns_wtime"),2)%> |
<%=rssmall("ns_order")%> |
">[修改] " onClick="return DelSmall();">[删除] |
<%rssmall.movenext
loop
rssmall.close
set rssmall=nothing
%>
<%rsbig.movenext
loop
rsbig.close
set rsbig=nothing
%>
