tenho 2 colunas e preciso de 3

[ricardo coelho designer 0]

Boa tarde, estou fazendo um site esperimental de comércio eletrônico em uma das página gostaria de colocar 3 colunas e só tem duas e já tentei de tudo, lembrando que conheço pouco de asp.

 

segue abaixo o código utilizado

 

<%if VersaoDb = 1 Then

if pag = "" then
inicial = 0
final = 4
inicialx = 4
else
inicial = pag 
final = 4
inicialx = 4 + pag
end if

'Abre os produtos do departamento na primeira coluna
set rs = abredb.execute("SELECT * FROM produtos WHERE idsessao = '"&strParam&"' ORDER by nome LIMIT "&inicial&","&final&"")
'Abre os produtos do departamento na segunda coluna
set rs3 = abredb.execute("SELECT * FROM produtos WHERE idsessao = '"&strParam&"' ORDER by nome LIMIT "&inicialx&",4")
if rs.eof or rs.bof then%>
<tr><td rowspan=4 valign=top></td></tr>
<%else
while not rs.EOF
precito = formatNumber(rs("preco"),2)
intProdID = rs("idprod")

'Inicia a primeira coluna%>
<tr><td>
<table BORDER="0" CELLSPACING="1" CELLPADDING="0"><tr><td bgcolor=#bfbfbf>
<table BORDER="0" CELLSPACING="1" CELLPADDING="3"><tr><td bgcolor=#ffffff>
<form action="comprar.asp" method="post" name=comprar<%=rs("idprod")%>>
<table align=center width=260 cellspacing="1" cellpadding="1">
<tr>
<td width=80 height=100><img src="produtos/<%=rs("impeq")%>" width="75" border="0"></td>
<td valign=center width=200><font style=font-size:11px;font-family:<%=fonte%>>
<b><font color=000000><%=rs("nome")%></b><br><br>
<b><%=strLg29%></b> <%= strlgMoeda & " " & precito%><br><b><%=strLg28%></b> <%if rs("estoque") = "s" then response.write strLg26 else response.write strLg27 end if%> <%=strLg25%><div align=right><br>
<input type="hidden" name="intProdID" value="<%= intProdID %>">
<input type="hidden" name="intQuant" value=1><%if rs.fields("estoque") = "s" then response.write "<a href=""java script: document.comprar"&rs("idprod")&".submit();""><img src="&dirlingua&"/imagens/comprar_2.gif border=0 alt=""Comprar Produto"" onMouseOut=""window.status='';return true;"" onMouseOver=""window.status='Comprar Produto';return true;""></a>  " end if%>
<a href="produtos.asp?produto=<%=rs("idprod")%>"  onMouseOut="window.status='';return true;" onMouseOver="window.status='<%=strLg30%>';return true;" style="color:#FFFFFF;text-decoration:none;">
<img src=<%=dirlingua%>/imagens/detalhes.gif border="0"></a></div></td>
</form>
</tr>
</table></td></tr>
</table></td></tr>
</table></td></tr>
<%rs.MoveNext
pagn = inicial + 8
wend
rs.close
set rs = nothing
end if%>
</table>
</td>

<td valign=top>
<table>
<%if rs3.eof or rs3.bof then%>
<tr><td rowspan=4 valign=top></td></tr>
<%else
while not rs3.EOF
'Formata o preco
precito2 = formatNumber(rs3("preco"),2)
'id do produto
intProdID2 = rs3("idprod")

'Inicia a segunda coluna %>
<tr><td>
<table BORDER="0" CELLSPACING="1" CELLPADDING="0"><tr><td bgcolor=#bfbfbf>
<table BORDER="0" CELLSPACING="1" CELLPADDING="3"><tr><td bgcolor=#ffffff>
<form action="comprar.asp" method="post" name=comprar<%=rs3("idprod")%>>
<table align=center width=260 cellspacing="1" cellpadding="1">
<tr>
<td width=80 height=100><img src="produtos/<%=rs3("impeq")%>" width="75" border="0"></td>
<td valign=center width=200><font style=font-size:11px;font-family:<%=fonte%>>
<b><font color=000000><%=rs3("nome")%></b><br><br>
<b><%=strLg29%></b> <%=strlgMoeda & " " & precito2%><br><b><%=strLg28%></b> <%if rs3("estoque") = "s" then response.write strLg26 else response.write strLg27 end if%> <%=strLg25%><div align=right><br><input type="hidden" name="intProdID" value="<%= intProdID2 %>">
<input type="hidden" name="intQuant" value=1><%if rs3.fields("estoque") = "s" then response.write "<a href=""java script: document.comprar"&rs3("idprod")&".submit();""><img src="&dirlingua&"/imagens/comprar_2.gif border=0 alt=""Comprar Produto"" onMouseOut=""window.status='';return true;"" onMouseOver=""window.status='Comprar Produto';return true;""></a>  " end if%>
<a href="produtos.asp?produto=<%=rs3("idprod")%>"  onMouseOut="window.status='';return true;" onMouseOver="window.status='<%=strLg30%>';return true;" style="color:#FFFFFF;text-decoration:none;"><img src=<%=dirlingua%>/imagens/detalhes.gif border="0"></a></div></td></tr></form>
</table></td></tr>
</table></td></tr>
</table></td></tr>
<%rs3.MoveNext
wend
rs3.close
set rs3 = nothing
end if %>
</table></td></tr>
</table>
<table width=570>
<tr><td colspan=2>
<%'Calcula o numero de pagina
if totalreg Mod 8 <> 0 then
valor = 1
else
valor = 0
end if 
pagina = fix(totalreg / 8) + valor
pagina = replace(pagina,".","")
if pagina = "0" then pagina = "1" end if%>
<center>

<%paga = pagn - 16
paga = replace(paga,".","")
pagn = replace(pagn,".","")
pagdxx = pagdxx + 1
pagdxx = replace(pagdxx,".","")
pagdxx2 = pagdxx - 2
pagdxx2 = replace(pagdxx2,".","")
if pagdxx = "" then pagd = 1 end if
if paga < 0 then
paga = 0
else%>

<a HREF="sessoes.asp?itens=<%=paga%>&pagina=<%=pagdxx2%>&item=<%=Server.URLEncode(strParam)%>" style=text-decoration:none onMouseOut="window.status='';return true;" onMouseOver="window.status='<%=strLg209%>';return true;">
<font face="<%=fonte%>" style=font-size:11px>:: <b><%=strLg209%></b> ::</a></font>  

<%end if
if totalreg < final OR pagdxx = pagina then
totalreg = ""
else
variavel1 = CStr(pagdxx + 1)
variavel2 = Cstr(pagina)
variavel1 = replace(variavel1,".","")
variavel2 = replace(variavel2,".","")%>

  <a HREF="sessoes.asp?itens=<%=pagn%>&pagina=<%=pagdxx%>&item=<%= Server.URLEncode(strParam) %><%if variavel1  = variavel2 then response.write "&final=sim" end if%>" style=text-decoration:none onMouseOut="window.status='';return true;" onMouseOver="window.status='<%=strLg47%>';return true;">
<font face="<%=fonte%>" style=font-size:11px>:: <b><%=strLg47%></b> ::</a></font>
<%end if%>
<table width=100% cellspacing="0" cellpadding="0">
<tr><td colspan=2>
<table border=0 cellspacing=0 width=100% cellpadding=0>
<tr><td height=5></td></tr>
<tr><td height=1 bgcolor=<%=cor3%>></td></tr>
<tr><td height=5></td></tr></table></td></tr>
<tr><td><font face="<%=fonte%>" style=font-size:11px;color:000000><%=strLg45%> <B><%=pagdxx%></B> <%=strLg46%> <B><%=pagina%></B></td><td align=right><font face="<%=fonte%>" style=font-size:11px;color:000000>
<%if pagina = 1 then
finalera = "sim"
end if
if pagina <> 1 then
For i=1 to pagina - 1
i = replace(i,".","")
i2 = i - 1
i2 = replace(i2,".","")
fator = 8
totalfator = fator * i - 8
totalfator = replace(totalfator,".","")
paginadem = pagdxx
paginadem = replace(paginadem,".","")%>
 <a HREF="sessoes.asp?itens=<%=totalfator%>&pagina=<%=i2%>&item=<%=Server.URLEncode(strParam)%>" style=text-decoration:none;color:000000 onMouseOut="window.status='';return true;" onMouseOver="window.status='<%=strLg45%> <%=replace(i,",","")%>';return true;"><font face="<%=fonte%>" style=font-size:11px><%if paginadem = i  then response.write "<b><u>" end if%><%=replace(i,",","")%></u></b></a> ·</font>
<%Next
end if
pagina2 = pagina * 8 - 8
pagina2 = replace(pagina2,".","")
pagina3 = pagina - 1
pagina3 = replace(pagina3,".","")%>
 <a HREF="sessoes.asp?itens=<%=pagina2%>&pagina=<%=pagina3%>&item=<%=Server.URLEncode(strParam)%>&final=sim" style=text-decoration:none;color:000000 onMouseOut="window.status='';return true;" onMouseOver="window.status='<%=strLg45%> <%=pagina%>';return true;"><font face="<%=fonte%>" style=font-size:11px><%if finalera = "sim"  then response.write "<b><u>" end if%><%=pagina%></u></b></a></td></tr>
<tr><td colspan=2 align=center>
<table border=0 cellspacing=0 width=100% cellpadding=0>
<tr><td height=5></td></tr>
<tr><td height=1 bgcolor=<%=cor3%>></td></tr>
<tr><td height=5></td></tr>
</table>
<a HREF="java script: history.back()" style=text-decoration:none onMouseOut="window.status='';return true;" onMouseOver="window.status='<%=strLg41%>';return true;"><font face="<%=fonte%>" style=font-size:11px>:: <b><%=strLg41%></b> ::</a></font></td></tr>
</table>
</td></tr>
</table></td></tr>
</table></td></tr>
</table>

<%Else

regs = 4 'Aqui setamos quantos registros serão listados por página
pag = request.querystring("pagina")

if pag = "" Then
pag = 1
end if

set rs = createobject("adodb.recordset")
set rs.activeconnection = abredb
rs.cursortype = 3 'Definimos o cursor a ser utilizado
rs.pagesize = regs
sql = "SELECT * FROM produtos WHERE idsessao = '"&strParam&"' ORDER by nome"
rs.open sql
rs.movefirst
somando = 0

if rs.eof or rs.bof then%>
<tr><td rowspan=4 valign=top></td></tr>

<%else
rs.absolutepage = pag
contador = 0
do while not rs.eof and contador < rs.pagesize
precito = formatNumber(rs("preco"),2)
intProdID = rs("idprod")
if somando = 0 then

'Inicia a primeira coluna%>
<tr><td>
<table BORDER="0" CELLSPACING="1" CELLPADDING="0"><tr><td bgcolor=#bfbfbf>
<table BORDER="0" CELLSPACING="1" CELLPADDING="3"><tr><td bgcolor=#ffffff>
<form action="comprar.asp" method="post" name=comprar<%=rs("idprod")%>>
<table align=center width=200 cellspacing="1" cellpadding="1">
<tr><td height=100><img src="produtos/<%=rs("impeq")%>" width="75" border="0">
<font style=font-size:11px;font-family:<%=fonte%>><b> <br><br>
<font color=c58607><%=rs("nome")%></b><br><br>
<font color=67910e><b><%=strLgMoeda & " " & precito%></b> - 
<%if rs("estoque") = "s" then response.write strLg26 else response.write strLg27 end if%> <%=strLg25%>
<br><br>
<input type="hidden" name="intProdID" value="<%= intProdID %>">
<input type="hidden" name="intQuant" value=1>
<a href="produtos.asp?produto=<%=rs("idprod")%>" onMouseOut="window.status='';return true;" onMouseOver="window.status='<%=strLg30%>';return true;" style="color:#FFFFFF;text-decoration:none;">
<img src=adm_imagens/loja_detalhes.gif border="0"></a>
<%if rs.fields("estoque") = "s" then response.write "<a href=""java script: document.comprar"&rs("idprod")&".submit();""><img src=adm_imagens/loja_comprar.gif border=0 alt=""Comprar Produto"" onMouseOut=""window.status='';return true;"" onMouseOver=""window.status='Comprar Produto';return true;""></a>  " end if%>   <br>
</td></form></tr></table>
</td></tr></table>
</td></tr></table>
</td>

<% contador = contador + 1
somando = 1
elseif somando = 1 then

'Inicia a segunda coluna%>
<td>
<table BORDER="0" CELLSPACING="1" CELLPADDING="0"><tr><td bgcolor=#bfbfbf>
<table BORDER="0" CELLSPACING="1" CELLPADDING="3"><tr><td bgcolor=#ffffff>
<form action="comprar.asp" method="post" name=comprar<%=rs("idprod")%>>
<table align=center width=200 cellspacing="1" cellpadding="1">
<tr><td height=100><img src="produtos/<%=rs("impeq")%>" width="75" border="0">
<font style=font-size:11px;font-family:<%=fonte%>><b> <br><br>
<font color=c58607><%=rs("nome")%></b><br><br>
<font color=67910e><b><%=strLgMoeda & " " & precito%></b> - 
<%if rs("estoque") = "s" then response.write strLg26 else response.write strLg27 end if%> 
<%=strLg25%>
<br><br>
<input type="hidden" name="intProdID" value="<%= intProdID %>">
<input type="hidden" name="intQuant" value=1>
<a href="produtos.asp?produto=<%=rs("idprod")%>" onMouseOut="window.status='';return true;" onMouseOver="window.status='<%=strLg30%>';return true;" style="color:#FFFFFF;text-decoration:none;">
<img src=adm_imagens/loja_detalhes.gif border="0"></a>
<%if rs.fields("estoque") = "s" then response.write "<a href=""java script: document.comprar"&rs("idprod")&".submit();""><img src=adm_imagens/loja_comprar.gif border=0 alt=""Comprar Produto"" onMouseOut=""window.status='';return true;"" onMouseOver=""window.status='Comprar Produto';return true;""></a>  " end if%>  <br>
</td></form></tr></table>
</td></tr></table>
</td></tr></table>
</td></tr>
<% contador = contador + 1
somando = 0
end if
rs.movenext
loop
end if%>
</table></td></tr></table>

[Ted k' 126]

temos vários exemplos aqui cara no fórum, dê uma pesquisada que você encontra!

 

agora tente somar mais 2 com ifs