Com Loop

[marcos-rj 0]

To precisando de ajuda neste loop. to fazendo uma agenda. ela abre os horarios de 08:00 as 18:00. preciso que quand tiver alguém agendado abra no horario, ate ai tudo bem. mas so está mostrando o 1º que esta agendado os outros ficam em branco. ate consegui fazer listar os outros, mas esta estava duplicando os horarios.

 

tipo assim:

 

08:00 - MARCOS FERNANDES

09:00

10:00

11:00 - JULIANA DOS SANTOS

12:00

13:00

14:00

15:00

16:00

17:00

18:00

 

MAS NÃO está ABRINDO ASSIM.

 

 

<table border="0" width="743"><%horario = "08:00"while horario <= "18:05"horario = left(horario, 5)count = count+1if coratual = "white" thencoratual = "#cecece"elsecoratual = "white"end if%><tr bgcolor="<%=coratual%>" onmouseover="this.style.background='#e9e9e9';window.status='<%'=rs("nome")%>';return true;" onmouseout="this.style.background='<%=coratual%>';window.status='';return true;"><td> <b><font size="2"><%if not rs2("hora") = "" and rs2("hora") = horario then%> <%=horario%> - <%=rs2("paciente")&" - "&rs2("convenio")%><%else%><%=horario%><%end if%></font></b></td></tr><%horario = dateadd("n", 60,horario)wendrs2.movenext%></table>

O duplicado está saindo assim:

 

08:00 - MARCOS FERNANDES09:0010:0011:0012:0013:0014:0015:0016:0017:0018:0008:0009:0010:0011:00 - JULIANA DOS SANTOS12:0013:0014:0015:0016:0017:0018:00

[Veronica Gravino 0]

horarioInicio = "08:00"horarioFim = "18:00"HorarioEvento = rs3("HR_CURS")while HorarioEvento <= horarioInicio and HorarioEvento >= horarioFimHorarioEvento = left(horario, 5)

Já tentou algo assim?Tenta filtrar mais a sua condição...!

[CassianoVix 0]

Marcos

 

O problema está ocorrendo pois você está executando o movenext do recordset fora do loop.

 

é só você colocar dentro do loop, assim:

 

<%horario = dateadd("n", 60,horario)rs2.movenextwend%>

Abraços,

Cassiano.

[marcos-rj 0]

Valew, grande. eu tinha tento assim tb. gera o seguinte erro:

 

08:00  09:00   error '80020009' /odontocenter/agenda_medico.asp, line 45

Será que o erro esta neste IF?

 

<%if not rs2("hora") = "" and rs2("hora") = horario then%> <%=horario%> - <%=rs2("paciente")&" - "&rs2("convenio")%><%else%><%=horario%><%end if%>

esta é a linha 45!

[CassianoVix 0]

Valew, grande. eu tinha tento assim tb. gera o seguinte erro:

08:00  09:00   error '80020009' /odontocenter/agenda_medico.asp, line 45

Será que o erro esta neste IF?

<%if not rs2("hora") = "" and rs2("hora") = horario then%> <%=horario%> - <%=rs2("paciente")&" - "&rs2("convenio")%><%else%><%=horario%><%end if%>

esta é a linha 45!

Acho que o erro ocorre pq você não está verificando se chegou ao final do recordset.No seu while, acrescente o seguinte:

while horario <= "18:05" or not rs2.eof

Ou , caso os horários estejam vindo do banco, acho que você pode deixar só:

while not rs2.eof

Abraço