Ciao a tutti, dovrei fare la somma per mese e la somma totale di alcuni record, ma mentre quella totale mi riesce, quella parziale per mese no!!!
Se qualcuno potesse aiutarmi gliene sarei grato, il codice è questo :

codice:
.......SELECT IDScad,DataScad,Descrizione,NomeFornitore,Importo,"&Sum&"(ElencoScadenze.Importo) AS TOTALE, Month(DataScad) AS Mese, StatoPagamento FROM ElencoScadenze ORDER BY DataScad ASC ")
periodo=""
totgen=0
while NOT objrs.EOF
if periodo<>objrs("Mese") then
%>
<tr>
<td colspan="7" class="ms-grid8-left" style="background-color: #CCFFFF">Mese di : <%=MonthName(Month(objrs("DataScad")),False)%>
</td>
</tr>
<tr>
<td class="ms-grid8-left" align="center">Data</td>
<td class="ms-grid8-left" align="center">Descrizione</td>
<td class="ms-grid8-left" align="center">Fornitore</td>
<td colspan="2" class="ms-grid8-left" align="center">Importo</td>
<td colspan="2" class="ms-grid8-left" align="center"><font color="#FFFFFF">-</font></td>
</tr>
<%
periodo=objrs("Mese")
end if
%>
<tr>
<td class="ms-grid8-even">
<%Response.Write objrs("DataScad")%>
</td>
<td class="ms-grid8-even">
<%Response.Write objrs("Descrizione")%>
</td>
<td class="ms-grid8-even">
<%Response.Write objrs("NomeFornitore")%>
</td>
<td colspan="2" class="ms-grid8-even" align="right">
<%Response.Write " € "&(formatNumber(objRs("Importo"),2))%>
</td>
<td align="center" class="ms-grid8-even">
<form method="post" action="Modifica_scadenza.asp?id=<%=objRs("IDScad")%>">
<button type="submit" value="Modifica">Modifica
</button>
</form>
</td>
<td align="center" class="ms-grid8-even">
<form method="post" action="conferma_elimina_scadenza.asp?id=<%=objRs("IDScad")%>">
<button type="submit" onClick="return elimina();">


Elimina</p>
</button>
</form>
</td>
</tr>
<%
totgen=totgen+objRs("Importo")
%>
<%
objrs.Movenext
wend
%>
<tr height="8"><td colspan="6">
	</td></tr>
<td class="ms-grid8-even" colspan="4" align="right">Totale Generale</td>
<td class="ms-grid8-even" align="right">
<%=" € "&(formatNumber((totgen),2))%>
</td>
</tr>
<%
objRs.Close
Set objrs = Nothing
objConn.Close
set objConn = nothing
%>
</table>