Ciao a tutti, so che ne avete già parlato ma non riesco ad adattare quello che ho trovato nel mio script.
Devo visualizzare il risultato di questa query in 5 colonne.

<%

Set rs = Server.CreateObject("ADODB.Recordset")
Set rs = conn.Execute("SELECT DISTINCT * FROM sottocat, cat WHERE cat.cod_cat=sottocat.cod_cat")

Dim old_catego
old_catego = ""%>


<%
Do While Not rs.EOF

if rs.Fields("cod_cat") <> old_Catego then
Response.Write "
" & rs.Fields("categoria") & "

"
old_catego = rs.Fields("cod_cat")
End If

Response.Write rs.Fields("sottocat") & "
"

rs.MoveNext

Loop
%>




Ora lo vedo così:

Acquisti

Idea Regalo
Shopping online
Moda
Abbigliamento
Accessori

Auto

Accessori Auto
Auto
Assicurazioni
Finanziamenti
Noleggio Auto

Aziende

Team Building
Consulenza
Gestione
Comunicazione
Di tutto un po'

Annunci

Annunci

Divertimento

Incontri
Chat
Amicizia
Amore
Cartomanzia
Web Agency

GRAZIEEEEEEEEEEEEEEEEEEEEE