Listbox et base de données

Résolu
neg03 Messages postés 95 Date d'inscription jeudi 7 mai 2009 Statut Membre Dernière intervention 3 juillet 2009 - 17 avril 2008 à 12:09
lolokun Messages postés 1241 Date d'inscription mardi 10 octobre 2006 Statut Membre Dernière intervention 27 août 2013 - 17 avril 2008 à 16:20
Bonjour,
je suis débutant en vb6 : je possède un formulaire et je souhaite remplir une listbox avec des métiers qui sont stockés dans ma table Metier.
Par la suite je voudrais pouvoir enregistrer  mon choix avec le nom de la personne que j'aurai saisie dans une textbox à coté dans ma table Personne.
Ayant vu plusieurs tutoriels je ne sais tjrs pas comment faire déjà pour remplir ma listbox avec le champ de ma table.
Merci de bien vouloir m'aider.

5 réponses

lolokun Messages postés 1241 Date d'inscription mardi 10 octobre 2006 Statut Membre Dernière intervention 27 août 2013 6
17 avril 2008 à 16:20
De rien c'ets fait pour ça un forum..

Par contre , si ton problème est résolu, penses à cloturer en mettant réponse acceptée sur le ou les posts qui t'ont aidés.

Cela permettra à d'autres membres qui rencontreraient le même problème de trouver la solution sans avoir besoin de redemander.

De plus, les personnes qui viennent aider iront voir en priorité les
posts qui ne sont pas cloturés afin d'essayer d'apporter leur aide
plutôt que de venir voir un post déjà solutionné.

L'expérience, c'est une connerie par jour, mais jamais la même..
3
lolokun Messages postés 1241 Date d'inscription mardi 10 octobre 2006 Statut Membre Dernière intervention 27 août 2013 6
17 avril 2008 à 12:16
Bonjour,


1 - Sais tu déjà te connecter à la base de données?

2 - Sais tu ajouter des items dans une listbox ?

3 - Tu dis avoir vu plusieurs tutoriels, as-tu essayé de mettre en
place? Y'a t'il quelque chose que tu n'aies pas compris dans ces
tutoriels?


Voici quelques mots qui pourraient t'être utiles pour tes recherches : recordset, additem

L'expérience, c'est une connerie par jour, mais jamais la même..
0
neg03 Messages postés 95 Date d'inscription jeudi 7 mai 2009 Statut Membre Dernière intervention 3 juillet 2009
17 avril 2008 à 13:53
Le seul souci que j'ai concerne la listbox et ma connexion avec ma base de données fonctionne.
J'ai essayé de faire ceci :
Private Sub Form_Load()
    Dim bds As Database
    Dim SQL As String


    Set bds = OpenDatabase("C:\...\baseD.mdb")
    SQL = "SELECT nomMetier FROM metier"
    Set bds = bds.OpenRecordset(SQL)


    With rs
        .MoveLast
        .MoveFirst
            Do While Not .EOF
                   Metier.AddItem !nomMetier
                .MoveNext
            Loop
        .Close
    End With
    bds.Close
End Sub


et l'erreur que j'ai est "type incompatible" à la ligne Set bds = bds.OpenRecordset(SQL)
0
lolokun Messages postés 1241 Date d'inscription mardi 10 octobre 2006 Statut Membre Dernière intervention 27 août 2013 6
17 avril 2008 à 14:06
Dim rs as recordset

Set rs = bds.OpenRecordset(SQL) 'c'ets ton recordset ici que tu dois ouvrir.

L'expérience, c'est une connerie par jour, mais jamais la même..
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
neg03 Messages postés 95 Date d'inscription jeudi 7 mai 2009 Statut Membre Dernière intervention 3 juillet 2009
17 avril 2008 à 15:59
merci
0
Rejoignez-nous