Questo è un problema di JavaScript, non di ASP ). Prova così :
codice:
<div id="nav"><ul>
	    <%
            Do While Not Rs.Eof
                if(rs("Autore") <> Autore) then
                	Response.Write("[*]" &  rs("Autore") & "<div>")
                end if
                %>


 <!-- questo 

 dovrebbe far scattare l'evento -->
Testo: <%=rs("Testo")%>


Data pubblicazione: <%=rs("DataPubb")%>
		............. altre info......
</p>

<%
' chiudi </div> e 
if(rs("Autore") <> Autore) then
response.write("</div>")
Autore = rs("Autore") ' nuovo autore
end if
Rs.MoveNext
Loop
%>[/list]</div>
Ciau!
- Dean