codice:
	 <%
sql="select * from quesiti_area"
Set rec= Server.CreateObject("ADODB.Recordset")
Set Rec=Conn.Execute(SQL) 
%>
<table width="100%" border="0">
  <tr>
    <td></td>
    <td><table border="0"><tr>
<%
    ' IMPOSTO A 0 IL CONTATORE
    contatore = 0
    ' APRO IL RECORDSET
    rs.Open "SELECT * FROM u_guest ORDER BY nomecompleto ASC", cn, 1
    ' ESEGUO IL CICLO
    While rs.EOF = False
        ' IMPOSTO LA PAGINAZIONE A 3 COLONNE ED N RIGHE
        ' IN FUNZIONE DEL NUMERO DI RECORD PRESENTI NEL DB
        If contatore = 3 Then
            contatore = 0
            Response.Write "</tr><tr>"
        End If
%>
    <td><%=rs("nomecompleto")%></td>
<%
        rs.MoveNext
        ' INCREMENTO IL VALORE DEL CONTATORE
        contatore = contatore + 1
    Wend
    rs.Close
%>
</tr></table></td>
  </tr>
  <%While Not rec.EOF%>
  <tr>
    <td><%=rec("alberatura")%></td>
    <td>id utente <%=rs("id")%> - ambito <%=rec("id")%> </td>
  </tr>
<% rec.MoveNext
Wend
rec.close%>
</table>