<%
Dim ClassObj,i,RsNewsObj
i = 0
ClassObj = "Select ClassCName,ID,menu,show From Class where show=true order by menu desc"
Set Rs = Conn.Execute(ClassObj)
while Not Rs.eof
Set RsNewsObj = Conn.Execute("Select count(*) as NewsNum from News where ClassID="&Rs("ID")&"")
%> <td height="30" background="Images/Box_1/SearchLine.gif"><a href="ClassList.asp?Id=<%=Rs("ID")%>"><%=Rs("ClassCName")%></a>[<font color="#FF0000"><%=RsNewsObj("NewsNum")%></font>]</td>
          <%Rs.Movenext
i=i+1
If i Mod 6 = 0 Then
Response.Write("</tr>"&chr(13)&chr(10)&"          <tr>"&chr(13)&chr(10)&"          ")
End if
wend
Rs.Close
RsNewsObj.Close
Set RsNewsObj = Nothing
Set Rs = Nothing%>
——————————————————————————————————————————
public string classcount()//栏目列表附含每栏目的新闻数量
{
string strclasscount=null;
dr=new CReader("Select ClassCName,ID,menu,show From Class where show=1 order by menu desc");
while (dr.Read())
{
dr=new CReader("Select count(*) as NewsNum from News where ClassID='"+dr["ID"]+"'");
strclasscount="<a herf='aisd.aspx?id="+dr["ClassCName"]+"'>"+dr["NewsNum"]+"</a>";

}
dr.Close();
return strclasscount;
请大家帮我写一下。因为我是新手有很多东西弄不明白所以还是麻烦一下大家。

解决方案 »

  1.   

    共两条SQL语句第一条
    Select ClassCName,ID,menu,show From Class where show=true order by menu desc
    第二条中需要插入第一条中读出来的栏目ID
    Select count(*) as NewsNum from News where ClassID="&Rs("ID")&""&Rs("ID")&" 是第一条SQL语句中读出来的
      

  2.   

    strclasscount="<a herf='aisd.aspx?id="+dr["ClassCName"]+"'>"+dr["NewsNum"]+"</a>";
    这个语句是随便写的目的就是测试+dr["NewsNum"]+"看看是不是能够使用