我想调用单个分类的图片,要怎么做???? - ASP

若叶花吹雪

电梯直达

1^#

发表于 2010-1-9 05:06:04 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

我想调用单个分类的图片,要怎么做????(我不想显示所有分类最新发布的图片,只想让它显示某一个分类的最新图片)

这段代码要怎么改????
<table width="100%" border="0" cellpadding="0" cellspacing="5" bgcolor="#FFFFFF">
            <%

            sql="select top 8 * from album a,members b  where a.member_id=b.member_id  order by a.release_date desc"
      'response.write sql
      set rs=server.createobject("adodb.recordset")
            rs.open sql,conn
            i=1
      while not rs.EOF
      if i=1 then
      response.write "<tr>"
      end if
      if rs("if_multi")="1" then
               icon="multi.gif"
            else
               icon="single.gif"
            end if
      if rs("if_best")="1" then
               icon_best="Icon_4.gif"
            else
               icon_best="Icon_2.gif"
            end if
            if (cstr(session("can_admin"))="1" or session("class_ID_admin")=rs("class_id")) and session("class_ID_admin")<>"" then
               delStr="<a href=""javascript:if (confirm('是否删除该作品？')==true){MM_openBrWindow('del.asp?subject=album&topic_id="&rs("album_id")&"','Del');}"" >删</a>"
            end if
%>
            <td width="20%" valign="bottom" align="center">
               
               <table border="0" align="center" cellpadding="0" cellspacing="0">
                  <tr>
                  <td><TABLE width=1 border=0 align="center" cellPadding=0 cellSpacing=0>
                        <TBODY>
                        <TD>
                        <TR>
                        <TD bgColor=#ffffff> <TABLE cellSpacing=0 cellPadding=0 border=0>
                              <TBODY>
                              <TR>
                                 <TD onMouseOver="this.style.backgroundColor='#B8C5CD';return true;" onMouseOut="this.style.backgroundColor='#ffffff';">
                                    <TABLE cellSpacing=0 cellPadding=2 width="100%"
                              border=0>
                                    <TBODY>
                                       <TR>
                                          <TD> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                                             <TBODY>
                                                <TR>
                                                <TD align=center><a href="album_detail.asp?album_id=<%=rs("album_id")%>"><img border="0" src="doc_img/album/<%=rs("mini_img")%>" ></a></TD>
                                                </TR>
                                             </TBODY>
                                          </TABLE></TD>
                                       </TR>
                                    </TBODY>
                                    </TABLE></TD>
                              </TR>
                              </TBODY>
                           </TABLE></TD>
                        </TR>
                     </TABLE></td>
                  </tr>
               </table>
               <b><font color="#808080">
               <a href="album_detail.asp?album_id=<%=rs("album_id")%>"> <%=rs("album_title")%></a></font></b><br>
               <%=rs("nickname")%> <br>
      <nobr><font class="en7pt" color="#666666"><img src="images/Icon_1.gif" align="absMiddle" width="19" height="16"><%=rs("click_count")%><img src="images/<%=icon_best%>" align="absMiddle" width="19" height="16"><%=rs("vote_count")%><img src="images/Icon_3.gif" align="absMiddle" width="19" height="16"><%=rs("reply_count")%>
      </font><img src="images/<%=icon%>" align="absMiddle" width="19" height="16"> <%=delStr%></nobr>
          </td>
      <%
      if i=4 then
      response.write "</tr>"
      i=0
      end if
            i=i+1

      rs.movenext
      Wend
         if i<>1 then
            for j=i to 4
                           %>

            <td width="20%" valign="bottom" align="center">

            </td>
            <%
               next
               response.write "</tr>"
         end if

  rs.close
  set rs=nothing

%>
</table>

收藏0

使用道具举报

冰美人

2^#

发表于 2010-1-9 05:06:08 | 只看该作者

sql="select top 8 * from album a,members b where a.member_id=b.member_id order by a.release_date desc"
改成
sql="select top 8 * from album a,members b where a.member_id=b.member_id (and 单个分类的条件) order by a.release_date desc"

回复支持反对

使用道具举报

ylsdf

3^#

发表于 2010-1-9 05:06:12 | 只看该作者

楼主的分类id有限吗？根据不同的id来确定对应的分类，比如说假设你的分类id的字段名为id
sql="select top 8 * from album a,members b where a.member_id=b.member_id and id="&Request.QueryString("id")&" order by a.release_date desc"

回复支持反对

使用道具举报

`|楛纞♂ぺ﹖

4^#

发表于 2010-1-9 05:06:16 | 只看该作者

我不知道要怎么改啊,怎么改都不行,

回复支持反对

使用道具举报

		自动登录	找回密码
密码			注册