Problema simples como

[sims 0]

Salve comunidade,

Estou com um probleminha simples, eu quero mostrar 9 registros em 3 linhas e 3 colunas. Gostaria de saber como fazer para distribuir estes registros.

 

eu estou usando este codigo mas ele me da todos os registros do banco 3 por linha

gostaria de setar 9 registros, 3 linhas, 3 colunas

 

Tipo

[ r1 ][ r2 ][ r3 ]

[ r4 ][ r5 ][ r6 ]

[ r7 ][ r8 ][ r9 ]

depois paginar o resto do recordset.

 

aqui vai o codigo que utilizo

se alquem puder ajudar

 

ASP [/tr][tr]

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<!--#include file="../../Connections/banco.asp" -->

<%

Dim rs

Dim rs_numRows

 

Set rs = Server.CreateObject("ADODB.Recordset")

rs.ActiveConnection = MM_banco_STRING

rs.Source = "SELECT * FROM fotos"

rs.CursorType = 0

rs.CursorLocation = 3

rs.LockType = 1

rs.Open()

 

rs_numRows = 0

%>

 

<table>

 

<%

While Not rs.EOF

Response.Write "<tr>"

For R = 1 To 3 'aqui define qtos registros mostrar por linha

If rs.EOF = True Then Exit For

Response.Write "<td>"

Response.Write "<table align='center' border='0' width='100%' cellpadding='1' cellspacing='0'>"

Response.Write "<tr>"

%>

<img src="fotos/<%=(rs.Fields.Item("id_festa").Value)%>/<%=(rs.Fields.Item("nome").Value)%>">

<%

Response.Write "</tr>"

Response.Write "</table>"

Response.Write "</td>"

rs.MoveNext

Next

 

Response.Write "</tr>"

Wend

%>

</table>

<%

rs.Close()

Set rs = Nothing

%>

[/tr]

 

Desde já agradeço qualquer ajuda.

 

Atenciosamente

 

Rogério sims

[rOcKLoCo 0]

cara, dá uma procurada em uns tópicos anteriores, pois eu postei a lógica de como faz isso!!é bem simples!!falows