Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Galdino Vilela

Do While... Loop

Recommended Posts

Povo...

 

É o seguinte:

 

Estou montando um esqueminha de notícias, e na página inicial tem a opção de clicar na notícia para ler a matéria... até aí tudo normal.

 

Usando esses códigos:

<%   Count = 0      Do While Not rsNI.EOF  And Count < 7%><tr><font face="Verdana" size="1" color="#3d3d3d"><b><%data%> - <%hora%></b> - <a href="materia.asp?ID=<%=ID%>"><%=Titulo%></a></font><br><%          Count = Count + 1      rsNI.MoveNext      Loop
Fica assim:

 

05/02/2004 - 10:45 - fulano mata 3 e deixa 4 feridos

05/02/2004 - 11:00 - carro atropela 3

05/02/2004 - 12:25 - noticia...

05/02/2004 - 13:55 - balblabla blalbla

04/02/2004 - 10:45 - balbalbalbalbalb

04/02/2004 - 15:30 - ciclano mata 2

 

Só que eu precisva de um código que ficasse assim:

 

05/02/2004

>> 17:45 - fulano mata 3 e deixa 4 feridos

>> 16:00 - carro atropela 3

>> 12:25 - noticia...

>> 10:55 - balblabla blalbla

04/02/2004

>> 17:45 - balbalbalbalbalb

>> 15:30 - ciclano mata 2

 

RESUMINDO

 

Eu queria organizar as notícias por data e hora mas quando as notícias forem do mesmo dia ficassem subdividos como no exemplo acima...

 

Alguém tem alguma idéia

 

Eu tentei fazer um loop dentro do outro... mas não deu certo...

Compartilhar este post


Link para o post
Compartilhar em outros sites

Use duas variáveis para a data, uma delas você só usará para controlar quando ela mudar.

daí:

<%  Count = 0     Do While Not rsNI.EOF  And Count < 7           data = rsNI("nome_campo_data")%>
pegou a data do registro

<tr>     <%if data <> data2 then              data2 = data      %>              <font face="Verdana" size="1" color="#3d3d3d"><b><%=data%></b><br>     <%end if%>
Se for diferente do que está armazenado na variável data2 altera o valor de data2 e imprime a data.

>> <%hora%></b> - <a href="materia.asp?ID=<%=ID%>"><%=Titulo%></a></font><br>
senão, só imprime a linha da hora e data2 continua sendo a mesma para a verificação do próximo registro

<%         Count = Count + 1     rsNI.MoveNext     Loop

O resto é contigo

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.