Discussion :

[gratesnif]

Bonjour, je sais que cette question a été posée des centaines de fois et j'aii du lire les trois quart des réponses à ce sujet.


Comment fais on marcher le recordcount?

voici une partie de code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
sub test()
dim sqlcmd as string
dim rs as ADODB.Recordset
Set rs = New ADODB.Recordset
SqlCmd = "select * from Table"
for i = 1 to 4
for j = 1 to4
rs.Open SqlCmd, maconnection, i, j
If Not (rs.EOF And rs.BOF) Then
msgbox i & " " & j & " " & rs.RecordCount
rs.movelast
msgbox i & " " & j & " " & rs.RecordCount
rs.movefirst
msgbox i & " " & j & " " & rs.RecordCount
endif
next i
next j
set rs = maconnection.execute(SqlCmd)
msgbox rs.RecordCount
rs.movelast
msgbox rs.RecordCount
rs.movefirst
msgbox rs.RecordCount
end sub

quelque soit la méthode que je tente d'utiliser, je récupere -1

ça a de quoi m'énerver...

merci d'avance

Gratesnif.

[SilkyRoad]

bonsoir

tu trouveras plusieurs solutions en utilisant le mot clé RecordCount, dans ce lien:

http://office.developpez.com/faq/


bonne soirée
michel