Count records in Access

SELECT COUNT (*) AS TotalRows
FROM tablename
WHERE field = 'red';

You can create a recordset for each color like so:

SELECT Count(*) AS Total
FROM colors
WHERE colorName = 'colorName'

Or you could create loops for all the colors to loop through a single recordset to keep count of the colors. Simliar to:

<%
while not rs.eof
dim redCounter
dim blueCounter

if rs.fields.item("colorName") = 'blue' then
blueCounter += 1
elseif rs.fields.item("colorName") = 'red' then
redCounter +=1
end if

loop
%>

That is just off the top of my head, you will need to do some tweaking to get it to work for your application. That should point you in the right direction.