Deu pau nesse While com MoveNext

Oi pessoal.

Então..abaixo segue um codigo que pegue valores de imagem do banco de dados e os coloca numa lista por ordem de registro:

<% While ((Repeat1__numRows <> 0) AND (NOT rsAgencia.EOF)) %> <tr> <td width="142" align="default"><div align="center"><a href="view_imagem.asp?<%= "Registro=" & rsAgencia.Fields.Item("Registro").Value %>" target="_blank"><img src="<%=rsAgencia.Fields.Item("Imagem").Value%>" border="0" <%=ImageResize(Server.MapPath(rsAgencia.Fields.Item("Imagem").Value), 130, 83)%> /></a></div></td> </tr> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rsAgencia.MoveNext()Wend%>

beleza..se feito assim ele mostra direitinho 1 coluna com as imagens. No entanto, eu queria que aparecessem 3 colunas pra aproveitar melhor o espaço na tela.

Dae fiz assim e deu erro:

<% While ((Repeat1__numRows <> 0) AND (NOT rsAgencia.EOF)) %> <tr> <td width="142" align="default"><div align="center"><a href="view_imagem.asp?<%= "Registro=" & rsAgencia.Fields.Item("Registro").Value %>" target="_blank"><img src="<%=rsAgencia.Fields.Item("Imagem").Value%>" border="0" <%=ImageResize(Server.MapPath(rsAgencia.Fields.Item("Imagem").Value), 130, 83)%> /></a></div></td> <%rsAgencia.MoveNext()%> <td width="142" align="default"><div align="center"><a href="view_imagem.asp?<%= "Registro=" & rsAgencia.Fields.Item("Registro").Value %>" target="_blank"><img src="<%=rsAgencia.Fields.Item("Imagem").Value%>" border="0" <%=ImageResize(Server.MapPath(rsAgencia.Fields.Item("Imagem").Value), 130, 83)%> /></a></div></td> <%rsAgencia.MoveNext()%> <td width="142" align="default"><div align="center"><a href="view_imagem.asp?<%= "Registro=" & rsAgencia.Fields.Item("Registro").Value %>" target="_blank"><img src="<%=rsAgencia.Fields.Item("Imagem").Value%>" border="0" <%=ImageResize(Server.MapPath(rsAgencia.Fields.Item("Imagem").Value), 130, 83)%> /></a></div></td> </tr> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rsAgencia.MoveNext()Wend%>

Eu simplesmente peguei e repeti a codigo que gera a coluna da tabela e meti antes dele um MoveNext() pra que ele pulasse pro registro seguinte para que nao aparecessem imagens repetidas.

Contudo, ao chegar na ultima imagem, a pagina abre beleza mas na parte aonde devia aparecer um espaço em branco (pois depois da última imagem não tem nada), aparece isso:

ADODB.Field error '800a0bcd'

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

/fotos.asp, line 723

Linha 723 - Inicio do codigo da 3ª coluna..abaixo do 2º <%rsAgencia.MoveNext()%>

O que fazer para resolver esse problema? Tentei um monte de coisas já e nada.