codice:
<%
Cella = 1 
Voto = 1
NumRec = 1

Do until objrs.eof 
	
   If Cella = 1 Then 
      Response.Write "<tr>" 
   end if 
	
   Response.Write "<td width='120'> <div align='right' class='linkpiccoli'><font color='#454545'>" & objrs("Valore") & "</font> "
   Response.Write "</div></td>" 
	
   Cella = Cella + 1 

   If Cella = 3 Then 
      Response.Write "</tr>" 
      Cella = 1 
   end if 
		
   objrs.movenext

Loop
%>