Recuperation du nombre d'enregistrements sous
darkman972
Messages postés
90
Statut
Membre
-
darkman972 Messages postés 90 Statut Membre -
darkman972 Messages postés 90 Statut Membre -
Bonjour a tous
Malgre le fait que j'ai essayer deja tout ce qui a ete conseille sur le forum pour recuper le nombre d'enregistrements d'une requete access sous VBA , le recordcount me renvoie toujours -1. Pourtant j'ai mis avant move last et tout. Je comprends pas si quelqu'un peut m'aider s'il vous plait, voila le bout de code:
Dim sql
Dim req As ADODB.Recordset
Set req = New ADODB.Recordset
sql="select...."
req.Open sql, cnx
req.MoveLast
req.MoveFirst
nbrofrecs = req.RecordCount
Lionel
Malgre le fait que j'ai essayer deja tout ce qui a ete conseille sur le forum pour recuper le nombre d'enregistrements d'une requete access sous VBA , le recordcount me renvoie toujours -1. Pourtant j'ai mis avant move last et tout. Je comprends pas si quelqu'un peut m'aider s'il vous plait, voila le bout de code:
Dim sql
Dim req As ADODB.Recordset
Set req = New ADODB.Recordset
sql="select...."
req.Open sql, cnx
req.MoveLast
req.MoveFirst
nbrofrecs = req.RecordCount
Lionel
A voir également:
- Recuperation du nombre d'enregistrements sous
- Nombre facile - Télécharger - Outils professionnels
- Nombre de jours entre deux dates excel - Guide
- Mode de récupération - Guide
- Logiciel de récupération de données - Guide
- Nombre de page - Guide
2 réponses
Bonjour,
Normalement, ça aurait du fonctionner mais tu peux essayer d'une autre manière. Mais premièrement, ta connection "cnx" est-elle faite sur ton projet? Aussi, es-tu sûr que ta requête fonctionne et qu'elle est ouverte dans ton curseur "req"? Habituellement, moi je déclare le curseur comme ça:
Dim req as New ADODB.RecordSet
Je ne sais pas si ça change quelque chose, je fais du mieux que je peux pour t'aider.
Tu peux aussi essayer de le compter avec une boucle à la place:
Do until req.EOF
norofrecs = norofrecs + 1
req.MoveNext
Loop
Ça fonctionne toujours habituellement
Bonne chance
Normalement, ça aurait du fonctionner mais tu peux essayer d'une autre manière. Mais premièrement, ta connection "cnx" est-elle faite sur ton projet? Aussi, es-tu sûr que ta requête fonctionne et qu'elle est ouverte dans ton curseur "req"? Habituellement, moi je déclare le curseur comme ça:
Dim req as New ADODB.RecordSet
Je ne sais pas si ça change quelque chose, je fais du mieux que je peux pour t'aider.
Tu peux aussi essayer de le compter avec une boucle à la place:
Do until req.EOF
norofrecs = norofrecs + 1
req.MoveNext
Loop
Ça fonctionne toujours habituellement
Bonne chance
