Besoin d'aide VB ADO

Question

Je dois r&#233;aliser un formulaire de recherche sur des appartements avec
vb6 dans une base de donn&#233;es mysql. Les appartements sont identifi&#233;s
par un num&#233;ro et un num&#233;ro d'immeuble (cl&#233; compos&#233;e) et poss&#232;dent un
type (cl&#233; &#233;trang&#232;re). Ces types sont stock&#233;s dans une autre table.

Dans mon formulaire je dispose des &#233;l&#233;ments suivants:

- une combobox contenant tuos les types de la table TYPE-APT

- une listbox  contenant les appartements correspondant au  type choisi dans la combobox

- un bouton "Rechercher" qui affiche les appartements dans la listbox

- des textbox qui reprennent d'autres informations relatives &#224; l'appartement s&#233;lectionner dans la listbox

Le probl&#232;me est que je n'arrive pas &#224; afficher les informations dans
mes textbox, une fois que j'ai s&#233;lectionner l'appartement souhait&#233;.

Je suppose que je dois pourtant r&#233;utiliser mon recordset qui contient
la liste des appartements correspondant au type choisi, mais je ne vois
pas comment faire.

Si vous pouviez m'aider &#224; trouver une solution &#224; mon probl&#232;me, ca m'aiderai tres fortemen.

Je vous remercie par avance.

cs_Jack · Answer

Salut
Avec un peu de curiosit&#233; et de courage, tu aurais ouvert quelques sources sur ce site et tu aurais trouv&#233; ! (et l'aide aussi)
Une fois que tu as ton RecordSet 'rs', il te suffit de r&#233;cup&#233;rer les donn&#233;es :
rs.MoveFirst
txtBox1.Text = rs!monChamp1
txtBox2.Text = rs!monChamp2 ...

Si tu as plusieurs r&#233;sultats, suffit de faire une boucle :
rs.MoveFirst
Do While Not EOF(rs)
   txtBox1.Text = rs!monChamp1
   txtBox2.Text = rs!monChamp2 ...
   MoveNext
Loop

Vala
Jack
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Le savoir est la seule mati&#232;re qui s'accroit quand on la partage. (Socrate)

Besoin d'aide VB ADO

1 réponse

Discussions similaires