När det blir för många sidor, byt rad

Hej

Nu har jag kommit längre o längre på sidan jag håller på med.

Har precis fått igång paging'en.
Nu är det så att det rör sig om 1100 poster som ska skrivas ut, har gjort så att 40 poster skrivs ut / sida.

Så det blir en del sidor.

Nu hamnar alla sidor på en lång rad, alltså:
[1] [2] [3] osv osv.

Det blir många sidor som sagt, och man blir tvungen att scrolla horisontellt.

Det bill jag inte, utan jag vill lägga till en <br> efter 15 sidor, så det blir:

[1][2][3].......[14][15]
[16][17] osv...

Till koden:

'___________________________________________________________

nextPage = TRIM( Request.Querystring( "nextPage" ) )
IF nextPage = "" THEN nextPage = 1

'___________________________________________________________
Set oRec = Server.CreateObject("ADODB.Recordset")

SQL = "Select ID, Adress, Gatunummer FROM nycklar ORDER BY Adress ASC;"
oRec.Open SQL, oConn, 1, 3

%>
<table class='show_all' cellpadding='0' cellspacing='0'>
<%

oRec.PageSize = 40 '<-- Här bestämmer du hur många inlägg det ska finnas på sidan
oRec.AbsolutePage = nextPage

Do until oRec.EOF OR rowCount = oRec.PageSize
rowCount = rowCount + 1
  
cnt = cnt + 1
strColor = "#FCFDC7" 
If cnt Mod 2 = 0 then strColor = "#FEFEDE"
%>
<tr bgcolor="<%= strColor%>"><td><%=Response.Write("<a href='bla.asp?id=" & oRec("ID") & "'>" & oRec("Adress") & "</td><td>" & oRec("Gatunummer") & "</a>")%></td></tr>
<tr><td colspan='2' height='5'></td></tr>
<%
oRec.MoveNext
Loop%>

<tr><td height='30' colspan='2'></td></tr><tr><td colspan='2'>
<%
IF oRec.PageCount > 1 THEN 

FOR a = 1 to oRec.PageCount
IF a <> cINT( nextPage ) THEN 
Response.Write "&nbsp;<a href='alla_adr.asp?nextPage="& a &"'>[ "& a &" ]</a>&nbsp;"
ELSE 
Response.Write "&nbsp;<b>"& a & "</b>&nbsp;"

END IF 
NEXT 
END IF

Set oConn = NOTHING
Set oRec = NOTHING
Set strSQL = NOTHING

%>
</td>
</tr>
</table>
</body>
</html>

VAD ska jag göra och HUR ska det se ut? Tack !