ASP的 上一页 下一页代码编写

<%
Set rs = ado_query("select  * from cms_info where SH = 1 AND i_parent in ("&get_channel(39,"c_sub")&") order by i_order desc  , id desc")
Do While Not rs.EOF
IF str_time("yy-mm-dd",rs("i_date")) = str_time("yy-mm-dd",Now()) Then
   riqixg = " style=""color:#F00"""
ELSE
   riqixg = ""
END IF
%>
        <li>
        
<div class="img_block">
            
<img src="<%=rs("i_picture")%>" />
                <a href="<%=i_url(rs("id"))%>" rel="lightbox[plants]" title="<%=str_left(rs("i_name"),60,"...")%>" class="zoom">放大</a>
                <a href="#" class="ilike">我喜欢</a>
          </div>
            <h3><%=str_left(rs("i_name"),60,"...")%></h3>
            <div class="iNum"><span>1</span><a href="#">4</a></div>

</li>




          <%
rs.movenext
Loop
rs.Close
Set rs = Nothing
%>

这个是我的代码
缺个 上一页 和下一页 不知道 版主能否帮忙编写一下

回复 1# 小夜网络


    能不能把完整的代码发过来看看，然后把分页的代码给你加进去。。这样也好测试，看效果

不错~~~~~~