商品小类管理

<% if session("admin")="" then conn.close set conn = nothing response.Write "" response.End else if request.cookies("timesshop")("admin")="" then conn.close set conn = nothing response.Write "" response.End end if end if call flagstr("产品管理","../error.htm") dim categoryid,category,follows categoryid=FormatSQL(SafeRequest("pid",0)) category=FormatSQL(SafeRequest("sorts",0)) %><% set rss=conn.execute("select model from category2 where categoryid="&categoryid) if not rss.eof then model=rss(0) end if%> 商品小类管理

　　<%=FormatSQL(SafeRequest("title",0))%>栏目管理

当前分类：<%=FormatSQL(SafeRequest("title",0))%>

<% if categoryid="" then response.Write "

请选择左测的分类

" else set rs=server.CreateObject("adodb.recordset") rs.Open "select * from sorts where categoryid="&categoryid&" order by sortsorder",conn,1,1 if rs.EOF and rs.BOF then response.Write "

还没有分类" follows=0 else do while not rs.EOF %> &title=<%=FormatSQL(SafeRequest("title",0))%>&pid=<%=FormatSQL(SafeRequest("pid",1))%>" onsubmit="return cc$('sorts','error1');">

<%rs.movenext loop follows=rs.RecordCount rs.close set rs=nothing end if end if %>

分类名称	分类排序	一级分类	确定操作
"> * "" then response.Write(rs("model")) else response.Write(model) end if%>">	">	<%if rs("first")=1 then response.Write "一级" else response.Write "二级" end if%>	&action=del&pid=<%=SafeRequest("pid",1)%>&title=<%=FormatSQL(SafeRequest("title",0))%>" onClick="return confirm('您确定进行删除操作吗？')">删除 ');"/>

　　添加栏目分类

当前分类：<%=FormatSQL(SafeRequest("title",0))%>

&title=<%=FormatSQL(SafeRequest("title",0))%>" onsubmit="return cc$('sorts2','error2');">

分类名称	分类排序	一级分类	确定操作
*		二级