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>