22/11/2006, 00:03
|
| | | Fecha de Ingreso: noviembre-2006
Mensajes: 1
Antigüedad: 17 años, 6 meses Puntos: 0 | |
| Yo lo hice de esta manera
'/*/*/*/*/*/*/*/*/*/*/*/*/
Dim ToTaL as Integer
set Tabla=NombreBasedeDatos.OpenRecordSet("Select count(*) From NombreTabla where condicion;", dbOpenDynaset)
If TaBlA.EOF = False Then
ToTaL = TaBlA.Fields(0)
End If
TaBlA.Close
'/*/*/*/*/*/*/*/*/*/*/*/*/
El resultado del conteo lo guarda el el campo inicial (el unico)
saludos!!! |