OVH Cloud OVH Cloud

Controle DATA

5 réponses
Avatar
François ROLAND
Quelques petites questions concernant le controle DATA que je ne maitrise
pas du tout

Comment remplir un combo avec les donnée d'une base

1- j'avais pensé à un truc comme

do


loop until

Mais que metre dedans, et until quoi ?

2- comment pointer directement sur les donnée d'un enregistrement si on
connait sa position dans la base

Par exemple pour afficher les données dans une fiche

Cordialement

Ne maitrisant pas du tout le controle DATA, ces questions seront suivit par
d'autres le mement venu Merci d'avance

--

François ROLAND
francois.roland@free.fr

5 réponses

Avatar
JF P
Bonjour François,

Pour remplir un combo avec les donnée d'une base :
demande le 1er enregistrement de ton recordset
(movefirst), fais do until MonData.recordset.EOF pour ton
do...loop et remplit le combo avec les données de chaque
enregistrement

Pour pointer directement sur les données d'un
enregistrement : par exemple :
MonData.Recordset.FindFirst "requete SQL"

Cordialement,
JF P

-----Message d'origine-----
Quelques petites questions concernant le controle DATA


que je ne maitrise
pas du tout

Comment remplir un combo avec les donnée d'une base

1- j'avais pensé à un truc comme

do


loop until

Mais que metre dedans, et until quoi ?

2- comment pointer directement sur les donnée d'un


enregistrement si on
connait sa position dans la base

Par exemple pour afficher les données dans une fiche

Cordialement

Ne maitrisant pas du tout le controle DATA, ces


questions seront suivit par
d'autres le mement venu Merci d'avance

--

François ROLAND



.



Avatar
François ROLAND
Donc en résume, je fais:

Do

com_categorie.AddItem Data2.Recordset("categorie")


Data2.Recordset.MoveNext

Loop While Not Data2.Recordset.EOF

Mais quel est la syntaxe exacte de

com_categorie.AddItem Data2.Recordset("categorie")

Cordialemment


--

François ROLAND

"JF P" a écrit dans le message de news:
0a7901c39d2a$57d32af0$
Bonjour François,

Pour remplir un combo avec les donnée d'une base :
demande le 1er enregistrement de ton recordset
(movefirst), fais do until MonData.recordset.EOF pour ton
do...loop et remplit le combo avec les données de chaque
enregistrement

Pour pointer directement sur les données d'un
enregistrement : par exemple :
MonData.Recordset.FindFirst "requete SQL"

Cordialement,
JF P

-----Message d'origine-----
Quelques petites questions concernant le controle DATA


que je ne maitrise
pas du tout

Comment remplir un combo avec les donnée d'une base

1- j'avais pensé à un truc comme

do


loop until

Mais que metre dedans, et until quoi ?

2- comment pointer directement sur les donnée d'un


enregistrement si on
connait sa position dans la base

Par exemple pour afficher les données dans une fiche

Cordialement

Ne maitrisant pas du tout le controle DATA, ces


questions seront suivit par
d'autres le mement venu Merci d'avance

--

François ROLAND



.



Avatar
François ROLAND
Je ne comprend pas tout

j'ai fais ça

Data2.Recordset.MoveFirst

Do

com_categorie.AddItem Data2.Recordset("categorie")

Data2.Recordset.MoveNext

Loop Until Data2.Recordset.EOF


Si cette procedire est lancer par un bouton, ça marche tres bien. En
revanche, si elle est directement appeler dans form_load, ça me renvoie
l'erreur 91 ????????????


Au secours, je ne comprend plus

--

François ROLAND

"François ROLAND" a écrit dans le message de
news:
Quelques petites questions concernant le controle DATA que je ne maitrise
pas du tout

Comment remplir un combo avec les donnée d'une base

1- j'avais pensé à un truc comme

do


loop until

Mais que metre dedans, et until quoi ?

2- comment pointer directement sur les donnée d'un enregistrement si on
connait sa position dans la base

Par exemple pour afficher les données dans une fiche

Cordialement

Ne maitrisant pas du tout le controle DATA, ces questions seront suivit


par
d'autres le mement venu Merci d'avance

--

François ROLAND





Avatar
Zoury
Salut François! :O)

Si cette procedire est lancer par un bouton, ça marche tres bien. En
revanche, si elle est directement appeler dans form_load, ça me renvoie
l'erreur 91 ????????????



Le recordset n'est probablement pas encore intialisé à ce moment. Tu devrais
pouvoir tester son existence :

'***
Private Sub Form_Load()
Debug.Print (Not Data2.RecrodSet Is Nothing) ' renvoi vrai si existe
End Sub
'***

si c'est vrai essai ton code dans le Form_Activate()

--
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
Avatar
Zoury
Aussi, as-tu essayé de "binder" ton Data à ton ComboBox? ça doit ressembler
à ceci (je ne suis pas sur de la syntaxe).. :

'***
com_categorie.DataSource = Data2 ' ou Data2.Recordset
com_categorie.DataMember = "categorie"
'***

--
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