Preciso de uma ajuda.
Esta rotina abaixo procura dados em um arquivo .mdb e retorna uma tabela com as ocorrências(acidentes, etc.) de um funcionário.
Acontece que caso o funcionário possua uma ocorrencia, a rotina funciona que é uma beleza e gera a tabela com todas as informações, mas se não possui nenhuma ocorrência dá erro de página.
Desde já agradeço a todos
Abraços
**************************************************
******** Ocorrências Funcionário*************
**************************************************
-->
<% rs.Open "select * from consulta1 where numero='"&numero&"' order by data", Conexao %>
<span id="ocorrencias" style="display:none">
<table width="90%" align="center" border="1" cellpadding="5" cellspacing="1" class="txtConteudo">
<tr>
<th colspan="10" align="center">Ocorrências</th>
</tr>
<tr>
<th colspan="10" align="center">Nome: <%=Server.HTMLEncode(rs("nome"))%><BR />
Cargo: <%=cargo%> - Tempo: <%=tempo%> - Turno: <%=turno%> - Dpto: <%=dpto%></th>
</tr>
<tr>
<th>Nº</th>
<th>DATA
</td>
</th><th>LOCAL
</td>
</th><th>OCORRÊNCIA
</td>
</th></tr>
<% while not rs.eof
cont=cont+1 %>%>
<tr>
<td><%=cont%></td>
<td><%=day(rs("data"))&"/"&month(rs("data"))&"/"&year(rs("data"))%> </td>
<td><%=Server.HTMLEncode(rs("observacao"))%> </td>
<td><%=Server.HTMLEncode(rs("descricao"))%> </td>
</tr>
<%
rs.movenext
wend
%>
<%if cont=0 then%>
<tr>
<th colspan="4" class="notaalta">Não registramos nenhuma ocorrência.</th>
</tr>
<%end if%>
</table>
<BR />
</span>
<!--
Edição feita por: DarkSign, 24/10/2008, 13:09.
add tag [code] pra melhor visualização
