<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<% set rs_news=server.CreateObject("adodb.recordset")
sql="select * from system_text_sort where big_id=344 order by sx"
rs_news.open sql,conn,1,1
if rs_news.recordcount=0 then
response.Write("数据库暂无相关信息！")
end if %>		  
			  <table width="100%" height="25" border="0" cellpadding="0" cellspacing="0" bgcolor="#709EAE">
                <tr>
                  <td class="white">&nbsp;&nbsp;<img src="images/arrow_2.gif" width="15" height="14">&nbsp;<b>信息类别</b></td>
                </tr>
              </table>
			   <% do while not rs_news.eof %>	
                    <table id=rightmenu width="225" border="0" cellpadding="0" cellspacing="0">
                      <tr>
                        <td height="25" align="left" valign="middle"><a href="?sort_name_id=<%= rs_news("id") %>&title=<%= rs_news("sort_name") %>" title="<%= rs_news("sort_name") %>">&nbsp;<img src="images/about_13.gif" border="0">&nbsp;<%= rs_news("sort_name") %>
						<%  set rs_num=server.CreateObject("adodb.recordset")
sql="select * from system_text_info where sort_name_id="&rs_news("id")&" and pass=1" 
rs_num.open sql,conn,1,1        
 %><font color="gray">[<%= rs_num.recordcount %>]</font>
 <% rs_num.close
 set rs_num=nothing %></a></td>
                      </tr>
              </table>
			  <% rs_news.movenext
		  loop
		  rs_news.close
		  set rs_news=nothing %>	


