Contare e suddividere record per colore

[viki1967]

Scusate l'amnesia... conto i records da una tabella di access:

Set rs = server.CreateObject("ADODB.Recordset")
vSQL = "select * from cond where id = "&id&" order by cond asc"
rs.Open vSQL, miaConn, 1, 3
miaConn.execute(vSQL)

nRec = rs.RecordCount

ed ottengo il numero totale dei record; questi record però possono contenere nel campo "colore" un valore che può essere GIALLO, ROSSO o VERDE... come posso ottenere:

1)il numero dei record GIALLI
2)il numero dei record ROSSI
3)il numero dei record VERDI

:master: Grazie e buon anno a tutti!!!!