OVH Cloud OVH Cloud

tableau

5 réponses
Avatar
mimi
bonjour,
je voudrais, =E0 partir d'un recordset, remplir un tableau=20
dynamique (en y ajoutant les diff=E9rents champs de mon=20
recordset). Comment faire?
merci=20
mimi

5 réponses

Avatar
ng
Salut,

'déclaration du tbl :

Dim tblEnr() as String

'remplissage du tableau :
tblEnr = Recorset.GetRows

Le tbl retourné est a 2 dimmensions et permet de récupérer les
enregistrement par leur "coordonnées" :

sElement = tblEnr(1,1)

On pourra utiliser ubound pour le parcourrir.

--
Nicolas.

Les outils indispensables :

FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

Merci de répondre sur le groupe pour en faire profiter tout le monde.
"mimi" a écrit dans le message de
news: 110001c3df42$86ef6f60$
bonjour,
je voudrais, à partir d'un recordset, remplir un tableau
dynamique (en y ajoutant les différents champs de mon
recordset). Comment faire?
merci
mimi
Avatar
Christophe
Bonjour,

je te donne la marche à suivre car mes exemples sont en DAO

dim tailletableau as long
dim tabrecord() as 'ce que tu as besoin

tailletableau= nombre de record -1 en DAO (rst.recordcount-1)
redim tabrecord(tailletableau)
'si non vide
rst.movefirst 'va au premier record
i&=0
do while not rst.eof ' tant que pas la fin des enregistrement

tabrecord(i&)= rst("monchamp") ' affecte la valeur du record a l'element du
tableau
i&=i&+1
rst.movenext 'va au record suivant

loop 'et boucle

une autre solution et de faire un redim preserve dans la boucle do loop ce
qui évite de devoir connaitre la taille du tableau a priori, la fonction
recordcount étant capricieuse (balayage de la table avant)

Christophe Vergon

"mimi" a écrit dans le message de
news: 110001c3df42$86ef6f60$
bonjour,
je voudrais, à partir d'un recordset, remplir un tableau
dynamique (en y ajoutant les différents champs de mon
recordset). Comment faire?
merci
mimi
Avatar
Zoury
Salut Mimi! :O)

Les autres t'ont expliquée comment procéder.. moi je te demande pourquoi tu
veux faire cela? Pourquoi prendre les données d'un endroit x et les mettres
à un endroit y? Le Recordset à été conçu pour parcourir les données... alors
pourquoi les recopier dans un tableau?

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous
"mimi" wrote in message
news:110001c3df42$86ef6f60$
bonjour,
je voudrais, à partir d'un recordset, remplir un tableau
dynamique (en y ajoutant les différents champs de mon
recordset). Comment faire?
merci
mimi
Avatar
Christophe
salut Zoury
pas ce que pour du calcul matriciel sur les données c'est des fois bien
pratique !!!
christophe Vergon

"Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de
news:
Salut Mimi! :O)

Les autres t'ont expliquée comment procéder.. moi je te demande pourquoi


tu
veux faire cela? Pourquoi prendre les données d'un endroit x et les


mettres
à un endroit y? Le Recordset à été conçu pour parcourir les données...


alors
pourquoi les recopier dans un tableau?

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous
"mimi" wrote in message
news:110001c3df42$86ef6f60$
bonjour,
je voudrais, à partir d'un recordset, remplir un tableau
dynamique (en y ajoutant les différents champs de mon
recordset). Comment faire?
merci
mimi




Avatar
Zoury
> pas ce que pour du calcul matriciel sur les données c'est des fois bien
pratique !!!



Ahhh! oui, c'est une possibilité... :O)

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous