ASP sayfamızda veritabanından çektiğimiz verileri 2′şerli veya 3′erli sıralama yaptırma işlemini basit bir matematik işlemiyle halledebiliriz. Aşağıdaki kod işinize yarayacaktır. <% Set conn = Server.CreateObject(“ADODB.Connection”) conn.Open “DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=” & Server.MapPath(“Veritabani.mdb”) set Rs = conn.execute(“select * from tablo”) i=1 do while not Rs.eof response.write rs(“Alan”) & “, ” if i mod 2 = 0 then response.write “ ” end if i = i + 1 Rs.movenext loop %> Yukarıdaki kodları açıklayayım. İlk başta i değerimizi 1′e eşitledik ve her veri yazılışında bu değeri “i=i+1” ifadesiyle 1 arttırdık. ” if i mod 2 = 0 ” kodumuzda ise i sayısının 2′ye bölümünden kalan 0 ise (Yani eğer i sayısı 2′nin katı ise), “ ” ile yeni satıra geçmesini istedik. “, ” bu kod ise her veriden sonra virgül ve bir karakter boşluk bırakmasını sağlıyor. Böylece verilerimiz Veri1, Veri2 Veri3, Veri4 şeklinde sıralanacaktır.   Eğer bu işlemi 3′lü, 4′lü veya daha fazla bir rakam ile yapmak isterseniz “if i mod 2 = 0” kodundaki 2 yerine istediğiniz rakam değerini yazın. İşte bu kadar.   Eğer bunu tablo ile kullanmak istiyorsanız: <table border=”1″ width=”100%” cellspacing=”0″> <tr> <% i = 0 Do while not Rs.Eof %> <td width=”50%”><%=Rs(“Alan”)%></td> <% if i mod 2 then Response.Write “</tr><tr>” end if i = i + 1 Rs.MoveNext Loop %> </tr></table>