class.asp

校园二手交易系统,具有完备的后台操作以及应用功能!

<title>二手分类</title>
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center border=0 class=unname>
  <TBODY>
    <TR> <td><!--#include file="top.asp"-->

<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bordercolorlight="#ECEEE4" bordercolordark="#CCCABC" bgcolor="#FFFFFF">
  <tr> 
    <td align="center" height="30" background="image/tablebg.gif"  colspan="6"><b> 详细分类 </b> 
    </td>
  </tr>
  <%
	

	Sql = "Select Unid,ClassName from [2s_class] where flag = 0 order by Unid asc"
	set rs = conn.execute(sql)
	if not rs.eof then
		do while not rs.eof
			SqlStrs = "SELECT classid, Count(classid)  FROM 2s_list where classid ="& rs(0) &" GROUP BY classid"
	set RsStrs = conn.execute(SqlStrs)
	if not RsStrs.eof then
	classid="["&RsStrs(1)&"]"
	RsStrs.close : set RsStrs = nothing
	else
	classid="[0]"
	end if
	%>
  <tr valign="middle"> 
    <td class=th colspan="6"><font face="Wingdings">&nbsp;1</font><a href="index.asp?id=<%=rs(0)%>&classid=<%=rs(0)%>"><%=rs(1)%></a><%=classid%></td>
  </tr> 
      <%
	
	SqlStr = "Select Unid,ClassName,flag,orderflag from [2s_class] where flag <> 0 and flag = "& rs(0) &" order by OrderFlag asc"
	set RsStr = conn.execute(SqlStr)

	if not RsStr.eof then
    Response.write "  <tr bgcolor=#ffffff> "
		do while not RsStr.eof
			for i = 1 to 6
if RsStr.eof then
Response.write "<td height=28></td>"
else
SqlStrs = "SELECT Nclassid, Count(Nclassid)  FROM [2s_list] where Nclassid ="& RsStr(0) &" GROUP BY Nclassid"
	set RsStrs = conn.execute(SqlStrs)
	if not RsStrs.eof then
	classids="["&RsStrs(1)&"]"
	RsStrs.close : set RsStrs = nothing
	else
	classids="[0]"
	end if

	            Response.write "<td height=28 align=center><a href=sechand.asp?cid="& RsStr(0)&"&id="& rs(0) &">" &RsStr(1) & "</a>" &classids& "</td>"

				RsStr.movenext

end if
			next
Response.write "  </tr><tr bgcolor=#ffffff>"
		loop
	else
		Response.write ""
	end if
		RsStr.close
	%>

  <%
		rs.movenext
		loop
	else
		Response.write "<tr><td align=center colspan=2 height=25></td></tr>"
	end if
		rs.close
	%>
</table>
<!--#include file="bottom.asp"-->