Discussion :

[vince29]

Bonjour à tous,
voilà je me trouve devant une erreur que je n'arrive pas à m'expliquer alors que mon code est très basique.
En fait, je créé ma requête, je l'exécute et j'alimente une liste déroulante avec le résultat du recordset.
Pour une certain raison, j'ai voulu obtenir le nombre d'enregistrements dans le recordset en utilisant simplement la méthode recordcount.

voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Dim codeDoc As ADODB.Recordset
Dim reqCodDoc As String
 
reqCodDoc = "SELECT DISTINCT(champs1) FROM fichier"
codeDoc.Open reqCodDoc, Cnnbdd, adOpenDynamic, adLockReadOnly
 
compteur = codeDoc.RecordCount

Résultat, j'obtiens toujours -1 dans ma variable compteur alors que ma liste déroulante que j'alimente ensuite contient bien tous mes enregistrements.

Quelqu'un aurait-il une solution m'expliquant pourquoi le recordcount ne fonctionne pas ?
D'avance merci.

[vince29]

J'ai trouvé la solution en ajoutant ceci avant l'ouverture de mon recordset pour ceux que ça intéresse :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

codeDoc.CursorLocation = adUseClient

A+