Query and count

[OooH-Boy]

Hola, necesito un codigo que me permita contar los datos que tengo en mi data base solo hay dos tipos de datos y quiero un result algo asi
Blancos 15
Negros 25
Total 40
y si con estos datos puedo hacer una grafica alli no mas.

gracias.

[AlZuwaga]

La consulta que te va a devolver dos registros con sus nombres y cantidades:

SQL = "SELECT Tabla.Colores, Count(Tabla.ID) AS Cantidad FROM Tabla GROUP BY Tabla.Colores"

luego, para el total, podés hacer algo así..


do while not rs.eof
Total = Total + rs("cantidad")
response.write rs("colores") & ": " & Rs("cantidad")
response.write "<br>"
rs.movenext
loop
response.write "Total: " & Total

[OooH-Boy]

Mi table1, y el registro es Name, que me puedes decir este code no me funciona pero si me das una manito.


<%@ language="VBScript" %>

<% 'specify the provider
strProvider="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\data\coment.mdb"
'define the search query
SQL = "SELECT Name, Count(Name) AS Cantidad FROM Table1 GROUP by Name"
%>
<% do while not rs.eof
Total = Total + rs("cantidad")
response.write rs("colores") & ": " & Rs("cantidad")
response.write "<br>"
rs.movenext
loop
response.write "Total: " & Total %>

<% end if
'close products recset and flush from memory
rsProds.Close
set rsProds = Nothing
end if %>