想实现一个能够控制每行显示几张图片，应该在分页代码里怎么加，下面这段是分页代码，请高手帮忙看看。谢谢，如果有这样的分页代码，帮忙帖上，大家共享，一起进步


 <%
else
      rs.PageSize =12 '每页记录条数
    iCount=rs.RecordCount '记录总数
    iPageSize=rs.PageSize
    maxpage=rs.PageCount 
    page=request("page")
    
    if Not IsNumeric(page) or page="" then
        page=1
    else
        page=cint(page)
    end if
    
    if page<1 then
        page=1
    elseif  page>maxpage then
        page=maxpage
    end if
    
    rs.AbsolutePage=Page

    if page=maxpage then
        x=iCount-(maxpage-1)*iPageSize
    else
        x=iPageSize
    end if
    For i=1 To x
        %>