Problema al cargar productos en Pagina principal...

[Denite]

Buenas.
Tengo un problemilla con una web en .ASP que estoy redisenyando.
Se trata de una tienda de vinos.
El caso es que en la pagina principal se carga una seria de productos que previamente se han introducido para esta carga de la portada. Cuando entras se muestran 3 productos: la web es (tres w, punto, vinosdeautor, punto, com) Para que sirva de ejemplo (no pretendo hacer SPAM ni mucho menos).
Pero me gustaria conseguir que se vieran 3 y 3...y asi sucesivamente segun interese mostrar mas. Esto es: en columna de 3 en 3.

El codigo que me permite "cambiar" esto es el siguiente, pero no consigo dar con ello:

if Portada.RecordCount > 1 then
totalpagina = 4
else
totalpagina = 4
end if
enpagina = 1
Response.Write("<table class='portal' align='center' cellpadding='0' cellspacing='0'>")
Response.Write("<tr>")
While (Not Portada.eof And enpagina < totalpagina)
enpagina = enpagina +1
if (trim(totalpagina)) = 5 then

Agraderecia cualquier ayuda.
un saludo.

[Muzztein]

recomiendo que listes todas los vinos hacia abajo en DIVS separados
y luego le aplicas una CLASE CSS con un align LEFT.
Esto te generara algo similar a una tabla ordenada hacia el lado.

luego para mostrarlas en TRES columnas, colocas todo eso dentro de un gran DIV con un ancho que alcancen solo tres fotos de vinos y voila.

tema resuelto


y para la paginacion... busca por "paginacion" en estos foros. esta lleno de ayuda al respecto

[mc_quake]

Esto es lo que necesitas la clave esta en esta linea

<%if cc Mod 4 = 0 then Response.Write("</tr><tr>") %>
hay dices cuantos registros muestras por filas y luego saltas a la segunda

<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table border="0" cellpadding="0" cellspacing="0">
<tr>
<%
cc = 0
while not rs.eof
cc = cc + 1
%>
<td width="37" valign="top" style="padding-bottom:14px;"><img src="_carpeta/<%= rs("foto") %>" border="0" /></a></td>
<td width="15" valign="top"><img src="_carpeta/_pix.gif" width="1" height="1" /></td>
<%if cc Mod 4 = 0 then Response.Write("</tr><tr>") %>
<%
rs.movenext
wend
%>
</tr>
<tr>
<td height="1" colspan="2" valign="top"><img src="_carpeta/_pix.gif" width="1" height="1" /></td>
</tr>
</table></td>
</tr>
</table>