Recuperer le nombre d'enregistrement

Résolu
Signaler
Messages postés
30
Date d'inscription
jeudi 29 mars 2007
Statut
Membre
Dernière intervention
19 août 2019
-
Messages postés
4822
Date d'inscription
lundi 11 novembre 2002
Statut
Membre
Dernière intervention
15 novembre 2016
-
Je veux recupérer le nombre d'enregistrement d'une table access avec la fonction recordcount

Set rs = New ADODB.Recordset


sql = "SELECT code from entreebout order by code asc"


rs.Open sql, cn
 
rs.recordcount

le resultat que j'ai c'est  -1

4 réponses

Messages postés
4822
Date d'inscription
lundi 11 novembre 2002
Statut
Membre
Dernière intervention
15 novembre 2016
14
Salut,

Essaye cela :

Set rs = New ADODB.Recordset
Rs.CursorLocation = adUseClient
Sql = "SELECT code from entreebout order by code asc"
rs.Open sql, cn,, adOpenDynamic, adLockPessimistic 
msgbox rs.recordcount 

A+
Exploreur

 Linux a un noyau, Windows un pépin

 
Messages postés
30
Date d'inscription
jeudi 29 mars 2007
Statut
Membre
Dernière intervention
19 août 2019

Merci ça passe et je peux avoir de toi les explications


c-a-d AduseClient


adopendynamic et adlockpess...
Messages postés
515
Date d'inscription
dimanche 17 février 2002
Statut
Membre
Dernière intervention
10 mars 2008
3
Salut,

à cause d'un vieux problème lié à ADO, je te conseille de d'abord faire:
rs.movefirst
rs.movelast
rs.movefirst
'puis
rs.recordcount

Attention, il est peut etre util d'ajouter une test du genre :if rs.bof false or rs.eof false then
afin de vérifier si ta requête à bien retourné au moins 1 enregistrement !

sinon tu fais :
sql = "SELECT count(*) from entreebout"
rs.Open sql, cn 
rs.movefirst
msgbox  rs.fields(0).value

Yomm

[yommvb@free.fr yommvb@free.fr]

Et que la source soit avec toi!!!!!
Messages postés
4822
Date d'inscription
lundi 11 novembre 2002
Statut
Membre
Dernière intervention
15 novembre 2016
14
Salut,

Regarde avec ton aide en ligne tu as les explication de ce que j'ai utilisé..

A+
Exploreur

 Linux a un noyau, Windows un pépin