Dubbi su INNER JOIN e SELECT DISTINCT

[Iron83]

Ciao a tutti ragazzi,

come da topic ho un piccolo dubbio sulla query descritta, ho due tabelle relazionate da un dato "id_categoria", quando vado ad eseguire la INNER JOIN i dati vengono stampati a schermo perfettamente, l'unico problema è che avrei bisogno di visualizzare una categoria sola per ogni forum, descrivo che è meglio:

[B]Categorie Generali[/B] 

 Caccia e Pesca

 Macchine

[B]Categorie Specifiche[/B] 

 Banche e investimenti
 Finanza generale 

Quello che ricevo a schermo è questo:

Categorie generali
Caccia e Pesca    

Categorie specifiche
Banche e investimenti    

Categorie specifiche
Finanza generale 

Ho creato questa query:

sql = "SELECT DISTINCT (tbl_categorie.nome_categoria), tbl_forum.id_forum, tbl_forum.nome_forum, tbl_categorie.id_categoria FROM tbl_forum INNER JOIN tbl_categorie ON tbl_forum.id_categoria = tbl_categorie.id_categoria"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3 

Do While Not rs.EOF

%>
<tr>
    <td colspan="3">---> <%=rs("nome_categoria")%></td>
</tr>
<tr>
    <td><%=rs("nome_forum")%></td>
    <td>0</td>
    <td>0</td>
</tr>
<%
rs.Movenext
Loop
Conn.Close
Set Conn = Nothing
%> 

Dove sbaglio?