Select Distinct, Sum e Count

[optime]

così le conta tutte, fidati. magari c'è un errore nella stampa a video. posta il codice

[Partisan75]

così le conta tutte, fidati. magari c'è un errore nella stampa a video. posta il codice

forse perche non faccio il ciclo?

<%
'--Dichiarazione variabili
    Dim SQL4, RS4
       
    SQL4 = "SELECT DATA, COUNT(DATA) AS conteggio FROM STATISTICHE WHERE NEWSLETTERID = " & idnews & " GROUP BY DATA"
    Set RS4 = Conn.Execute(SQL4)
       
    'Response.write "quante aperte il primo giorno"&RS4("conteggio")&"<br>"
       
%>
    <TR>
        <td width="120" align="center" class="style3"><%=RS4("conteggio")%></td>
    </TR>