Registros

[ElAprendiz]

si no te muestra nada es por que la consulta no encontro registros
pon esto antes del do while para que no te tire un error si se da este caso

if not rs.eof then
DO WHILE NOT RC.EOF
%>
<tr><td><%=i%></td><td><%=rc("actividad")%></td><td><%=rc("horainicio")%></td><td><%=rc("horafinal")%></td><td><%=rc("tiempoprog")%></td></tr>
<%
rc.movenext
i = i + 1
loop
else
response.write "no se encontraron registros"
end if