La funzione AVG in un'istruzione SQL, permette di sapere la media di tutti i valori numerici di un campo di una tabella.
<% Dim cn,cm Set cn = Server.CreateObject("ADODB.Connection") cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("Archivio.mdb") set rs=cn.execute ("Select AVG(spesa) as media from tabella") response.write "Risultato medio del campo spesa: "&rs("media") cn.close Set cn = NOTHING Set rs = Nothing %>
Questo script leggerà "Tabella" nel database "Archivio.mdb" e calcolerà la media del valore di questo campo di tutti i record presenti.
Commenti
Per inserire un commento, devi avere un account.
Fai il login e torna a questa pagina, oppure registrati alla nostra community.