Elenco con articoli per mese e anno

[Gio&Ste]

    <%	
	Set RecSet = Server.CreateObject("ADODB.Recordset")
	Visa = "SELECT ID, News_Titolo, News_Sottotitolo, Year(News_data) as anno, Month(News_data) as mese  FROM News WHERE News_Tipo ='iniziative' group by ID, News_Titolo, News_Sottotitolo, Year(News_data), Month(News_data) order by Year(News_data) DESC, Month(News_data) desc"
	RecSet.Open Visa, objConn, adOpenDynamic, adLockOptimistic %>
        <%	Do Until RecSet.EOF %>
	<%Response.Write(MonthName(RecSet("mese")&""))%><%Response.Write(RecSet("anno")&"")%>
<div align="left"><div id="barlink">
        <a href="news/dettagli.asp?ID=<% =RecSet("ID") %>">
		<% =RecSet("News_Titolo") %>

		<% =RecSet("News_Sottotitolo") %></a>
        

</div>
  <%	RecSet.MoveNext
	Loop
	RecSet.Close %></div>

Con il codice sopra riportato vorrei fare in modo che nella pagina che vado a visualizzare si vedano i risultati della query in questo modo:

dicembre 2004
articolo1
articolo2
novembre 2004
articolox
articoloy
al momento il risultato che ottengo è invece:
dicembre 2004
articolo1
dicembre 2004
articolo2
novembre 2004
articolox
novembre 2004
articoloy

con una inutile ripetizione di testo

[wegawhite]

metti i response.write fuori dal ciclo.

[Gio&Ste]

Scusa, ma se metto i response fuori dal ciclo, mi viene fuori il mese e l'anno solo per il primo record estratto???

[qnello]

Ciao
hai scritto quello che vorresti avere, ma invece la tua select cosa ti da in risultato?
Ciao

[Gio&Ste]

dicembre 2004
articolo1
articolo2
novembre 2004
articolox
articoloy

al momento il risultato che ottengo è invece:

dicembre 2004
articolo1
dicembre 2004
articolo2
novembre 2004
articolox
novembre 2004
articoloy