循环数据的用法

<% If rs1.bof and rs1.eof Then %> 
<% Response.Write("没有信息！") %> 
<% Else %> 
<% 
rs1.PageSize=4 
if page=0 then page=1 
pages=rs1.pagecount 
if page > pages then page=pages 
rs1.AbsolutePage=page  
      
for j=1 to rs1.PageSize  
%> 
                  <tr> 
                      <td class="black" height="22"><img 
                                              src="images/a.jpg" /> [<%= admin %>]<a href="" target="_blank"><%= left(rs1("D_Title"),15) %></a></td> 
                  </tr> 
  <% 
rs1.movenext 
if rs1.eof then exit for 
next 
    %>