">
 <%=rs_big("bigclassname")%>
|
<%
id2=int(rs_big("id"))
bfl=int(request("bfl"))
if bfl=id2 then
asa=""
else
asa="DISPLAY: none"
end if
%>|
<%set rs_small=server.CreateObject("Adodb.RecordSet")
rs_small.open "select * from zp_smallclass where forbigclassid="&rs_big("id")&" order by sx asc",conn,1,1
if rs_small.recordcount<>0 then
do while not rs_small.eof%>
<%rs_small.movenext
loop
end if
rs_small.Close%>
|
<%rs_big.movenext
next
end if%>
