Imprimir em colunas

[marciolvs 1]

Boa Tarde Pessoal!!!

 

Bom, Preciso de um script em asp p/ que liste arquivo do banco em colunas tipo em 4 colunas... mas oq postarem ai vai me ajudar muito....

 

 

Tipo assim

 

foto1 | foto2 | foto3 | foto4

 

foto5 | foto6 | foto7 | foto8

 

atc...|

 

agradeço des de já...

 

Obrigado!!!

 

Marcio Leandro....

msn:marcio@riopretodesign.com.br

[marciolvs 1]

Cara, eu usei este esquema para fazer uma galeria de fotos, tipo, ele gera 5 colunas de fotos ate o fim das fotos cadastradas. Ve se você entende a logica da cosia.qq coisa posta.Abraço.

'fotosElseResponse.Write "<font size=2><B>"& cat &" > "& album & "</font></b><BR><BR>"Set rsFotos = Conexao.Execute("SELECT * FROM fotos WHERE album="&idalbum&"")If rsFotos.EOF ThenResponse.Write "Nenhuma foto encontrada!"ElseResponse.Write "<div align=""center""><table border=0 cellpadding=15 cellspacing=0 width=""80%"">"contar = 0Do while not rsFotos.eof If contar = 5 Then Response.Write "<tr>"End If If contar <> 5 Then Response.Write "<TR>"End If imagem=rsFotos("imagem")If RsFotos.eof then exit doResponse.Write "<td><a target=""_blank"" href="""&imagem&"""><img width=""60"" height=""60"" border=0 src="""&imagem&"""></a></td>"contar = contar +1rsFotos.MoveNextIf RsFotos.eof then exit doimagem=rsFotos("imagem") Response.Write "<td><a target=""_blank"" href="""&imagem&"""><img width=""60"" height=""60""  border=0 src="""&imagem&"""></a></td>"contar = contar + 1rsFotos.MoveNextIf RsFotos.eof then exit doimagem=rsFotos("imagem") Response.Write "<td><a target=""_blank"" href="""&imagem&"""><img width=""60"" height=""60""  border=0 src="""&imagem&"""></a></td>"contar = contar + 1rsFotos.MoveNextIf RsFotos.eof then exit doimagem=rsFotos("imagem") Response.Write "<td><a target=""_blank"" href="""&imagem&"""><img width=""60"" height=""60""  border=0 src="""&imagem&"""></a></td>"contar = contar + 1rsFotos.MoveNextIf RsFotos.eof then exit doimagem=rsFotos("imagem") Response.Write "<td><a target=""_blank"" href="""&imagem&"""><img width=""60"" height=""60""  border=0 src="""&imagem&"""></a></td>"contar = contar + 1rsFotos.MoveNextLoopResponse.Write "</tr></table></div>"End ifEnd IfEnd If %></font>

-----------------------------------------------------------------------------------------------------------------------------você não teria o codigo completo ai não... p/ que eu possa entender direito.... pq eu não cheguei em nenhuma comclusão