<%dim foxdao,foxdaoo,sqlfdao,foxcl,foxsh
foxcl=request("class1")
foxsh=request("sheng")
if foxcl<>"" then
set foxdao=server.createobject("adodb.recordset")
sqlfdao="select top 15 * from [FOX_class2] where class1="&foxcl&""        
foxdao.open sqlfdao,conn,1,1
if foxdao.eof then
else
%>
<table border=0 cellspacing=0 cellpadding=0 class="table2" width="100%">
<%do while not foxdao.eof%>
<tr> 
<td align="left" height="25" width="70"><b>·ÖÀà²éÑ¯£º
¡¡</b></td>
<td align="left" height="25">
<b>
<%if not foxdao.eof then%>
<a href="xinxilist.asp?class1=<%=foxcl%>&class2=<%=foxdao("id")%>" target="_blank"><font color="#FF0000"><%=left(foxdao("class2"),4)%></font></a>
<%dim rsl
set rsl=conn.execute("select count(id) from [FOX_xinxi] where ts=0 and class1="&foxcl&" and class2="&foxdao("id")&"")
response.write "["&rsl(0)&"]"
foxdao.movenext 
end if
%></b></td>
<td align="left" height="25">
<b>
<%if not foxdao.eof then%>
<a href="xinxilist.asp?class1=<%=foxcl%>&class2=<%=foxdao("id")%>" target="_blank"><font color="#FF0000"><%=left(foxdao("class2"),4)%></font></a>
<%
set rsl=conn.execute("select count(id) from [FOX_xinxi] where ts=0 and class1="&foxcl&" and class2="&foxdao("id")&"")
response.write "["&rsl(0)&"]"
foxdao.movenext 
end if
%></b></td>
<td align="left" height="25">
<b>
<%if not foxdao.eof then%>
<a href="xinxilist.asp?class1=<%=foxcl%>&class2=<%=foxdao("id")%>" target="_blank"><font color="#FF0000"><%=left(foxdao("class2"),4)%></font></a>
<%
set rsl=conn.execute("select count(id) from [FOX_xinxi] where ts=0 and class1="&foxcl&" and class2="&foxdao("id")&"")
response.write "["&rsl(0)&"]"
foxdao.movenext 
end if
%></b></td>
<td align="left" height="25">
<b>
<%if not foxdao.eof then%>
<a href="xinxilist.asp?class1=<%=foxcl%>&class2=<%=foxdao("id")%>" target="_blank"><font color="#FF0000"><%=left(foxdao("class2"),4)%></font></a>
<%
set rsl=conn.execute("select count(id) from [FOX_xinxi] where ts=0 and class1="&foxcl&" and class2="&foxdao("id")&"")
response.write "["&rsl(0)&"]"
foxdao.movenext 
end if
%></b></td>
<td align="left" height="25">
<b>
<%if not foxdao.eof then%>
<a href="xinxilist.asp?class1=<%=foxcl%>&class2=<%=foxdao("id")%>" target="_blank"><font color="#FF0000"><%=left(foxdao("class2"),4)%></font></a>
<%
set rsl=conn.execute("select count(id) from [FOX_xinxi] where ts=0 and class1="&foxcl&" and class2="&foxdao("id")&"")
response.write "["&rsl(0)&"]"
foxdao.movenext 
end if
%></b></td>
<td align="left" height="25">
<b>
<%if not foxdao.eof then%>
<a href="xinxilist.asp?class1=<%=foxcl%>&class2=<%=foxdao("id")%>" target="_blank"><font color="#FF0000"><%=left(foxdao("class2"),4)%></font></a>
<%
set rsl=conn.execute("select count(id) from [FOX_xinxi] where ts=0 and class1="&foxcl&" and class2="&foxdao("id")&"")
response.write "["&rsl(0)&"]"
foxdao.movenext 
end if
%></b></td>
<td align="left" height="25">
<b>
<%if not foxdao.eof then%>
<a href="xinxilist.asp?class1=<%=foxcl%>&class2=<%=foxdao("id")%>" target="_blank"><font color="#FF0000"><%=left(foxdao("class2"),4)%></font></a>
<%
set rsl=conn.execute("select count(id) from [FOX_xinxi] where ts=0 and class1="&foxcl&" and class2="&foxdao("id")&"")
response.write "["&rsl(0)&"]"
foxdao.movenext 
end if
%></b></td>
<td align="left" height="25">
<b>
<%if not foxdao.eof then%>
<a href="xinxilist.asp?class1=<%=foxcl%>&class2=<%=foxdao("id")%>" target="_blank"><font color="#FF0000"><%=left(foxdao("class2"),4)%></font></a>
<%
set rsl=conn.execute("select count(id) from [FOX_xinxi] where ts=0 and class1="&foxcl&" and class2="&foxdao("id")&"")
response.write "["&rsl(0)&"]"
foxdao.movenext 
end if
%></b></td>
<td align="left" height="25">
<b>
<%if not foxdao.eof then%>
<a href="xinxilist.asp?class1=<%=foxcl%>&class2=<%=foxdao("id")%>" target="_blank"><font color="#FF0000"><%=left(foxdao("class2"),4)%></font></a>
<%
set rsl=conn.execute("select count(id) from [FOX_xinxi] where ts=0 and class1="&foxcl&" and class2="&foxdao("id")&"")
response.write "["&rsl(0)&"]"
foxdao.movenext 
end if
%></b></td>

</tr>
<%foxdaoo=foxdaoo+1
if foxdaoo>=2 then exit do
loop
%>
</table>
<%end if
foxdao.close
set foxdao=nothing
rsl.close
set rsl=nothing
end if%>