Tema: ADO y VB 6.0
Ver Mensaje Individual
  #2 (permalink)  
Antiguo 21/05/2004, 09:49
Avatar de Mplus
Mplus
 
Fecha de Ingreso: agosto-2003
Ubicación: colgando de un trebol
Mensajes: 157
Antigüedad: 21 años, 7 meses
Puntos: 0
tienes dos opciones:

1)


tSql = "select count(*) as cant ciclistas"
Set rsv = CreateObject("ADODB.Recordset")
rsv.Open tSql, connSql
If Not rsv.EOF Then
msgbox rsv("cant")
End If

rsv.Close
Set rsv = Nothing

2)
tSql = "ciclistas"
Set rsv = CreateObject("ADODB.Recordset")
rsv.Open tSql, connSql, 1, 2, 2
If Not rsv.EOF Then
msgbox rsv.recordcount
End If

rsv.Close
Set rsv = Nothing
__________________
Daría todo lo que sé por la mitad de lo que ignoro