Foros del Web » Programando para Internet » ASP Clásico »

contabilizar registros devueltos

Estas en el tema de contabilizar registros devueltos en el foro de ASP Clásico en Foros del Web. Como hago para contar los registros devueltos por una consulta?...
  #1 (permalink)  
Antiguo 13/01/2002, 17:26
 
Fecha de Ingreso: enero-2002
Mensajes: 57
Antigüedad: 22 años, 5 meses
Puntos: 0
contabilizar registros devueltos

Como hago para contar los registros devueltos por una consulta?
  #2 (permalink)  
Antiguo 13/01/2002, 18:13
 
Fecha de Ingreso: enero-2002
Mensajes: 6
Antigüedad: 22 años, 5 meses
Puntos: 0
Re: contabilizar registros devueltos

Si lo que estas haciendo es una consulta a una base de datos tienes que la propiedad
recordcount de un objeto Recordset te da la cantidad de registros devueltos:

sql = "Select * From tabla"
Set rs = Server.CreateObject("ADODB.Recordset")

rs.Open sql

Entonces rs.recordcount es la cantidad de registros devueltos.
  #3 (permalink)  
Antiguo 13/01/2002, 18:57
 
Fecha de Ingreso: enero-2002
Mensajes: 57
Antigüedad: 22 años, 5 meses
Puntos: 0
Re: contabilizar registros devueltos

gracias Racuva127!!! ;)
  #4 (permalink)  
Antiguo 13/01/2002, 19:30
 
Fecha de Ingreso: enero-2002
Mensajes: 57
Antigüedad: 22 años, 5 meses
Puntos: 0
Re: contabilizar registros devueltos

entendi lo del recordcount pero mi conexion es esta:

Set dbConn = Server.CreateObject("ADODB.Connection")
dbConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("pedido.mdb"))

que hago cierra esa conexion primero?

  #5 (permalink)  
Antiguo 13/01/2002, 19:46
 
Fecha de Ingreso: enero-2002
Mensajes: 57
Antigüedad: 22 años, 5 meses
Puntos: 0
Re: contabilizar registros devueltos

Hay alguna otra manera de hacerlo?

  #6 (permalink)  
Antiguo 13/01/2002, 19:53
XaRoD
Invitado
 
Mensajes: n/a
Puntos:
Re: contabilizar registros devueltos

Hola,

si solo quieres el numero de registros la manera más rápida de hacerlo sería:
Set dbConn = Server.CreateObject("ADODB.Connection")
dbConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("pedido.mdb"))
Dim rsNumReg, numReg
Set rsNumReg=dbConn.Execute("SELECT COUNT(*) AS nreg FROM tu_tabla")
numReg=rsNumReg("nReg")

Salu2
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 21:56.