Ir para conteúdo
Fórum Script Brasil
  • 0

Como Fazer Com Que A Tabela Liste 2x Numa Linha


mestre fyoda

Pergunta

<%
Option Explicit
%>

<!--#include file="conexao.asp"-->

<%

Dim con, rsProdutos, rsCategoria
Dim varCategoria, varNomeCategoria
Dim contador

varCategoria = Request.Form("pesquisa")

Set rsCategoria = con.Execute(" Select * From Categorias where COD_Categoria = '" & varCategoria & "' ")
varNomeCategoria = rsCategoria("Categoria")
rsCategoria.Close

Set rsProdutos  = con.execute(" Select * From Produtos where COD_Categoria = '" & varCategoria & "' ORDER BY Produto ")

%>
<html>
<head>
<style type="text/css">
    @import url("css/estilo.css");
</style>
</head>
<body>

<table width="392" border="1" cellspacing="0" cellpadding="0">
  <tr>
  
  <%
  
  While Not rsProdutos.EOF
  
  if contador = 2 Then
  
      contador = 0
    Response.Write("</tr><tr>")
  
  End IF

  %>     
    

    <td width="130">&nbsp;</td>
    <td width="264">&nbsp;</td>
  </tr>
  
  <tr>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <td colspan="2">&nbsp;</td>
  </tr>
</table>
    
<%

    contador = contador +1
    rsProdutos.MoveNext
    Wend

%>

</body>
</html>

<%

    rsProdutos.Close
    Set rsProdutos = Nothing
    Set rsCategoria = Nothing

%>

Com esse codigo, como eu faço para listar 2x na mesma linha ?

Link para o comentário
Compartilhar em outros sites

5 respostass a esta questão

Posts Recomendados

  • 0

basicamente é assim:

<table>
<% Do While Not rs.EOF %>
     <tr>
     <% For i = 1 To 4
          If Not rs.EOF Then %>
          <td><% = rs("produto") %></td>
          <% Else %>
          <td>&nbsp;</td>
               <% rs.MoveNext
          End If
     Next %>
     </tr>
<% Loop %>
</table>[/code]

veja se funciona ai adapte no seu codigo.

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,8k
×
×
  • Criar Novo...