Contar Registros

[OooH-Boy]

ayuda por favor
Table1(mi tabla en access)
Name (mi registro)

Nesecito contar cuantas veces aparce un dato en este registro algo asi:

Blancos 25
Negros 15
Total 40

<%
'Nos conectamos a la base de datos...
set oConn = Server.CreateObject("ADODB.Connection")
set rs = Server.CreateObject("ADODB.Recordset")
strProvider="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\data\corti.mdb"

SQL = "SELECT Table1.Name, Count(Table1.Name) AS Cantidad FROM Table1 GROUP BY Table1.Name"

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

creo que no lo entendi no tengo mucha experiencia por favor alguien me de una manito gracias.

[Mickel]

Creo que te falta

Set rs=oConn.execute(sSql)

antes del do while...

[OooH-Boy]

Hola ya encontre la solucion aqui eta. pero ahora quisiera si alguien me dice como meterlo dentro de una tablita con su encabezado .

sSQL = "SELECT Table1.Accion, Count(Table1.ID) AS Cantidad FROM Table1 GROUP BY Table1.Accion"

'Ejecutamos la orden
set RS = Conn.Execute(sSQL)
%>
<center>

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

'Cerramos el sistema de conexion
Conn.Close
%>

[Subotai]

amos a ver...
ahi te va la manera mas comoda de hacerlo, da igual el numero de campos y registros
<%
Dim tamanopagina
Dim aux
Dim contador
Dim cont
Dim elcolor

RS.pagesize= cint(tamanopagina)
%>

<table ALIGN=CENTER bgcolor=#44556F>
<%for aux = 0 to RS.Fields.Count - 1%>
<th ALIGN=CENTER bgcolor='<%=elcolor%>'>
<%= RS(aux).Name %>
</th>
<%Next%>
<%do while not RS.eof and contador <= cint(tamanopagina)%>
<tr bgcolor='<%=elcolor%>'>
<%cont=cont+1
if cont mod 2 = 0 then
elcolor="#B0AFBE"
Else
elcolor="#929AAF"
End if
for aux = 0 to RS.Fields.Count -2%>
<td ALIGN=CENTER bgcolor='<%=elcolor%>'>
<%= RS(aux) %>
</td>
<%next%>
</tr>
<%contador=contador+1
rs.movenext
loop
%>
</table>

quizas tengas ke retocar un poquillo ni lo he provado pero no puede quedar tan mal...
suerte

[OooH-Boy]

Hola gracias por la ayuda ya esta como lo necesitava, ahora quisiera hacer algo como agrupar los datos y un count asi

negro auto
negro barco
negro moto
Subtotal 3
Blanco auto
Blanco barco
Subtotal 2

Total 5

Alguna idea por favor .

gracias