(Resolvido) Tabela de horas com erro

[Ronaldo Bueno]

Olá, preciso de uma ajudinha ...

Tenho uma tabela com os seguinte campos, medico, especialidade, dia da semana, hora inicial, hora final:

na hora de preencher os registro fica assim:

medico XXX neurocirurgião segunda-feira 08:00 12:00

medico XXX neurocirurgião terça-feira 08:00 10:00

medico XXX neurocirurgião quarta-feira 12:00 16:00

medico XXX neurocirurgião quinta-feira 16:00 18:00

medico XXX neurocirurgião sexta-feira 10:00 14:00

medico AAA neurocirurgião segunda-feira 08:00 12:00

medico AAA neurocirurgião terça-feira 08:00 10:00

medico AAA neurocirurgião quarta-feira 12:00 16:00

medico AAA neurocirurgião quinta-feira 16:00 18:00

medico AAA neurocirurgião sexta-feira 10:00 14:00

e assim por diante.

O que eu queria fazer era uma tabela assim:

Dias da Semana e Horários:

Medico especialidade segunda terça quarta quinta sexta

XXX neurocirurgião 08:00 12:00 08:00 10:00 12:00 16:00 16:00 18:00 10:00 14:00

AAA neurocirurgião 08:00 12:00 08:00 10:00 12:00 16:00 16:00 18:00 10:00 14:00

ai um colega me ajudou a chegar nesse código:

<%
                registro=0
                contalinha=1
                
                Set objConn =  Server.CreateObject("ADODB.Connection")
                objConn.Open "CONEXAO"
                strQueryat = "Select * from atenderdiasemana"
                Set rsat=Server.CreateObject("ADODB.Recordset")
                rsat.Open strQueryat, objConn

                while not rsat.EOF
                registro = registro+1                
                
                if registro=1 then
                    response.write("<tr><td>"&rsat("medico")&"</td><td>"&rsat("especialidade")&"</td><td class='colorir' align='center'>"&rsat("horainicial")&"</td><td class='colorir' align='center'>"&rsat("horafinal")&"</td>")
                Else
                    if contalinha<4 then
                        response.write("<td class='colorir' align='center'>"&rsat("horainicial")&"</td><td class='colorir' align='center'>"&rsat("horafinal")&"</td>")
                    elseif contalinha=4 then
                        response.write("<td class='colorir' align='center'>"&rsat("horainicial")&"</td><td class='colorir' align='center'>"&rsat("horafinal")&"</td></tr><tr>")
                    else
                    contalinha=0
                    registro=0
                end if
                    contalinha=contalinha+1
                end if
                rsat.movenext
                wend
                response.write("</tr>")
                %>

esta acontecendo o seguinte:

os dados estão misturados, tipo ele começa com o primeiro médico, ai ele mostra só até quinta do primeiro e na mesma linha coloca a segunda-feira de outro, assim vai, até que o ultimo termina em terça e alguns médico ele não mostra.

Alguém poderia me ajudar ??? Obrigado

[Ronaldo Bueno]

Resolvido

[bareta]

a melhor saida é usar 2 tabelas....

id - médico - especialidade

id - dia_semana - horai - horaf

faz o select na primeira... ai já define 1 registro por linha

faz o select na segunda e define os horarios da linha.

[Ronaldo Bueno]

Obrigado bareta por responder, mas resolvi assim:

vou postar só o miolo

                while not rsat.EOF
                registro = registro+1                
                if registro=1 then
                    response.write("<tr><td>"&rsat("medico")&"</td><td>"&rsat("especialidade")&"</td><td class='colorir' align='center'>"&rsat("horainicial")&"</td><td class='colorir' align='center'>"&rsat("horafinal")&"</td>")
                Else
                    if contalinha<=3 then
                        response.write("<td class='colorir' align='center'>"&rsat("horainicial")&"</td><td class='colorir' align='center'>"&rsat("horafinal")&"</td>")
                    else
                    contalinha=0
                    registro=0
                    response.write("<td class='colorir' align='center'>"&rsat("horainicial")&"</td><td class='colorir' align='center'>"&rsat("horafinal")&"</td>")
                    end if
                    contalinha=contalinha+1
                end if
                rsat.movenext
                wend

tirei aquele if das linhas (eram dois) e coloquei um só com <= e coloquei o resultado do outro if sendo como else desse, deu certinho.

Obrigado mais uma vez ....

tenho mais um problema para resolver, vou postar, se puder de uma olhada.