La idea es esta:
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<%
counter=0
for i=1 to 15
%>
<td><%=rs("campo")%></td>
<%
counter=counter+1
If counter MOd 5=0 Then Response.Write "</tr><tr>"
Next
%>
</tr>
</table>
Tienes que combinar la paginacion con esto que te doy para mostrar los resultados de 15 en 15 tambien puedes modificarlo, lo importante es esto
If counter MOd 5=0 Then Response.Write "</tr><tr>"