[VB6] EOF

EOF [VB6] - Programmation

Marsh Posté le 01-05-2001 à 12:10:06    

J'aimerais connaître le nombre d'occurances que j'ai dans un champ d'une base de donnée sous Access, j'ai pensé à ça :
 
Dim cpt As Integer
While cpt < Table.eof
   cpt = cpt + 1
Wend
nombre_occu.Text = cpt
 
Mais ça ne fait rien du tout, y'a même pas un message d'erreur pour m'aider.
 
Quelqu'un pourrait m'éclairer ?
 
 
Merci !

Reply

Marsh Posté le 01-05-2001 à 12:10:06   

Reply

Marsh Posté le 01-05-2001 à 18:15:44    

Hey ! Ben comme EOF retourne un Boolean, faut faire autrement...

Reply

Marsh Posté le 01-05-2001 à 18:29:29    

je sais pas ce que tu utilises comme connection DB..
 
Mais en ADO tu a une propriété RecordCount qui te donnes tout de suite le nombre d'occurances
 
Rs.open"select..."
RS.Recordcount
a mon avis ca doit etre une propriété assez courante

Reply

Marsh Posté le 01-05-2001 à 18:30:59    

ou alors  C + lourd
 
While not Table.Eof
Cpt = Cpt + 1
Table.MoveNext (?)
Wend

Reply

Marsh Posté le 01-05-2001 à 21:16:20    

Ouais avec Recordcount c'est nickel !
 
Merci !

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed