Il titolo del 3D è in pratica la rappresentazione di ciò per cui chiedo il vostro aiuto.

In sostanza si parla di paginazione solo che:

Ho questo codice che mi visualizza i dati in tre colonne e a seconda di quanti record ho in banca dati, mi crea di volta in volta la riga nella tabella di visualizzazione:

codice:
<%
	Set Conn = Server.CreateObject("ADODB.Connection")
	Conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/db.mdb")
	Set Rs = Server.CreateObject("ADODB.Recordset")
	strsql = "SELECT * FROM fornitori ORDER BY id"
	Rs.open strsql, Conn
	if not rs.eof then
		%>
		<table width="100%" border="0">
			<%
			while not rs.eof
				i = i + 1
				if i mod 3 = 1 then response.write "<tr>"
				response.write "<td class=""corpo"" height=""25""><a href=""fornitore.asp?id=" & rs("id") & """>" & rs("societa") & "</td>"
				if i mod 3 = 0 then response.write "</tr>"
				rs.movenext
			wend
			if i mod 3 = 1 then response.write "<td></td><td></td></tr>"
			if i mod 3 = 2 then response.write "<td></td></tr>"
			%>
		</table>
		<%
	else
		response.write "<p class=""corpo"">nessun Fornitore in archivio</p>"
	end if
	rs.close
%>
Ora a questa tabella (che funziona bene) vorrei aggiungere un nuovo pezzo di codice:

"conta fino a 10 righe e poi passa alla pagina successiva"
in pratica se le righe sono più di 10 deve uscirmi in basso la navigazione tra pagine "1 - 2 - 3 - ecc"

Quacuno può aiutarmi?