| 类别管理（添加一级分类） |
| 类别列表 |
查看产品 |
添加时间 |
分类排序 |
操作 |
<%Set rsbig=Server.Createobject("Adodb.Recordset")
sql="select * from cbclass order by cb_order asc"
rsbig.open sql,conn,1,3
if rsbig.eof then response.Write("")
do while not rsbig.eof%>
 <%=rsbig("cb_name")%> <%if rsbig("Fileurl")<>"" then%>[图]<%end if%> |
">[查看] |
<%=formatdatetime(rsbig("cb_wtime"),2)%> |
<%=rsbig("cb_order")%> |
">[添加分类] ">[修改] " onClick="return Delbig();">[删除] |
<%Set rssmall=Server.Createobject("Adodb.Recordset")
sql="select * from csclass where cb_id="&rsbig("cb_id")&" order by cs_order asc"
rssmall.open sql,conn,1,3
if rssmall.eof then response.Write("")
do while not rssmall.eof%>
 <%=rssmall("cs_name")%> <%if rssmall("Fileurl")<>"" then%>[图]<%end if%> |
&Sid=<%=rssmall("cs_id")%>">[查看] |
<%=formatdatetime(rssmall("cs_wtime"),2)%> |
<%=rssmall("cs_order")%> |
">[修改] " onClick="return DelSmall();">[删除] |
<%rssmall.movenext
loop
rssmall.close
set rssmall=nothing
%>
<%rsbig.movenext
loop
rsbig.close
set rsbig=nothing
%>
