<%do While Not rs.EOF%>
Actual Projects
Former Projects
All Projects
<% rs.MoveNext %> <%Loop %>