[Resolvido] Problema ao listar registros do banco

[furbano 0]

Pessoal,

 

sou programador de final de semana e estou com algumas dificuldades. Tenho que listar os registros de uma tabela de um banco de dados (mysql).

 

O problema é que ele lista o mesmo registro e não vai pro próximo.

 

Alguém poderia me ajudar? Desde já agradeço

 

<%
dim rs

set rs = conn.Execute("SELECT * FROM Trades ORDER BY TradeId DESC") 

dim TradeId, TradeAtivo, TradeDataFim, TradeResulLiq, TradePeriodic, TradeSetup

TradeId = rs("TradeId")
TradeAtivo = rs("TradeAtivo")
TradeDataFim = rs("TradeDataFim")
TradeResultLiq = rs("TradeResultLiq")
TradePeriodic = rs("TradePeriodic")
TradeSetup = rs("TradeSetupId")

dim rsSetup, mostraSetup, rsPeriodic, mostraPeriodic

set rsSetup = conn.Execute("SELECT * FROM Setups WHERE SetupId = '"&TradeSetup&"'")
mostraSetup = rsSetup("SetupNome")

set rsPeriodic = conn.Execute("SELECT * FROM Periodicidades WHERE PeriodicId = '"&TradePeriodic&"'")
mostraPeriodic = rsPeriodic("PeriodicTitulo")

%>
<div id="boxbc">
<p class="tit">últimos trades</p>
   <div class="linha"></div>
   <table width="97%" border="0" cellspacing="0" cellpadding="3">
 <tr>
   <td width="8%"><strong>TRADE</strong></td>
   <td width="11%"><strong>ATIVO</strong></td>
   <td width="13%"><strong>DATA SAÍDA</strong></td>
   <td width="12%"><strong>RESULT. LÍQ.</strong></td>
   <td width="12%"><strong>PERIODICIDADE</strong></td>
   <td width="34%"><strong>SETUP</strong></td>
   <td width="10%"></td>
 </tr>
<%        
if rs.eof then
Response.Write("Nenhum trade encontrado.")
else
while not rs.eof
%>
 <tr class="hover">
   <td><%=TradeId%></td>
   <td><%=TradeAtivo%></td>
   <td><%=TradeDataFim%></td>
   <td>R$ <%=TradeResultLiq%></td>
   <td><%=mostraPeriodic%></td>
   <td><%=mostraSetup%></td>
   <td><a href="" title="diário de trade" class="diario">diário de trade</a><a href="" class="edit" title="editar">editar</a><a href="" class="detail" title="detalhes">detalhes</a></td>
 </tr>
<%
rs.movenext
wend
end if
%>
</table>

[xanburzum 169]

seu while not rs.eof

...

rs.movenext

wend

 

aparentemente esta correto, existem realmente dados na table

[furbano 0]

Pois é....ja pesquisei em 1 milhao de sites e nao encontrei a solução...sempre fiz assim, sempre deu certo.....agora nao ta rolando....

 

O banco é novo, tenho só 3 registros na tabela. Com o código acima, ele exibe o mesmo registro 3 vezes.

 

Tá osso de resolver!! Tenho quase certeza que é alguma coisa muito simples e idiota....mas nao consegui identificar...

[Vinicius Ianni 189]

Acho que tem um problema de logica, se entendi direito o código.

Você faz 3 selects e depois cria o loop.

 

Só que os 2 ultimos selects, dependem do valor do primeiro, e estão fora do loop então só receberam o valor do primeiro registro selecionado.

 

Para pegar os valores subsequentes dos 2 ultimos selects, teria de inclui-los dentro do loop do primeiro, assim sempre que o loop se completar, os valores dos 2 ultimos selects serão atualizados também.

[furbano 0]

Putz....eu sabia que era algo idiota....você ajudou muito Vinicius, obrigado.

 

Era isso que precisava estar dentro do loop

 

TradeId = rs("TradeId")
TradeAtivo = rs("TradeAtivo")
TradeDataFim = rs("TradeDataFim")
TradeResultLiq = rs("TradeResultLiq")
TradePeriodic = rs("TradePeriodic")
TradeSetup = rs("TradeSetupId")

 

 

Obrigado a todos pessoal!