都进来帮忙找找... 很急
<%set rs_s = server.CreateObject("adodb.recordset")
sql_s = "select * from anli_class"
rs_s.open sql_s,conn,1,3
if not rs_s.eof then
do while not rs_s.eof
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0" style="margin-top:10px;">
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="35" align="center"><a href="solution.asp?bigclassid=<%=rs_s("ClassID")%>"><font style="font-weight:bold"><%=rs_s("ClassName")%></font></a></td>
</tr>
</table></td>
</tr>
<tr>
<td>
<ul class="pro">
<%
' set rs_m = server.CreateObject("adodb.recordset")
' sql_m = "select * from anli_smallclass where ParentClassID="&rs_s("ClassID")
' rs_m.open sql_m,conn,1,3
'
' if not rs_m.eof then
' do while not rs_m.eof
%>
<!--<li><a href="solution.asp?samllclassid=<%'=rs_m("sClassID")%>&bigclassid=<%'=rs_s("ClassID")%>"><%'=rs_m("sClassName")%></a></li>-->
<%
' rs_m.movenext
' loop
' else
' response.Write("<center>暂无二级分类</center>")
' end if
' rs_m.close
' rs_m=nothing
%>
</ul>
</td>
</tr>
</table>
<%
rs_s.movenext
loop
else
response.Write("<center>暂无一级分类</center>")
end if
rs_s.close
rs_s=nothing
%>
注释的那些..解了就说超过IIS运行最长时间
