Jump to content
Fórum Script Brasil
  • 0

Como Fazer Com Que A Tabela Liste 2x Numa Linha


mestre fyoda
 Share

Question

<%
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 to comment
Share on other sites

5 answers to this question

Recommended Posts

  • 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 to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share



  • Forum Statistics

    • Total Topics
      151k
    • Total Posts
      649.1k
×
×
  • Create New...