IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB 6 et antérieur Discussion :

Remplir listbox sur base d'une autre listbox


Sujet :

VB 6 et antérieur

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre régulier
    Inscrit en
    Mai 2007
    Messages
    10
    Détails du profil
    Informations forums :
    Inscription : Mai 2007
    Messages : 10
    Par défaut Remplir listbox sur base d'une autre listbox
    Bonjour a Tous !

    Voila je veux remplir une listbox du nombre de pièce en stocke par rapport au choix effectué sur une listbox précédente, qui dans cette dernière on sélectionne la pièce dont on veut optenir le nombre.

    Je v essayer de résumer en plus clair:

    ListCarteMere > on en sélectionne une > affichage du nombre de carte mère en stocke dans la ListNbCarteMere

    Voici le code qui sert a remplir ListCarteMere :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    Dim oADORemplirList   As ADODB.Connection
        Dim oRSRemplirList    As ADODB.Recordset
        Dim strSQLRemplirList As String
     
        Set oADORemplirList = New ADODB.Connection
        With oADORemplirList
            .Provider = "Microsoft.jet.oledb.4.0"
            .Mode = adModeShareDenyNone
            .ConnectionString = "E:\Qualification 2007\Fraipont\VB Fraipont Qualif Pc Mag\MagPc.mdb"
            .Open
        End With
        Set oRSRemplirList = New ADODB.Recordset
        strSQLRemplirList = "SELECT fldNom FROM tblCarteMere ORDER BY fldNom"
        With oRSRemplirList
            .CursorLocation = adUseClient
            .Open strSQLRemplirList, oADORemplirList, adOpenForwardOnly, adLockOptimistic
            .Properties.Refresh
            .MoveLast
            .MoveFirst
            Do While Not .EOF
                ListCarteMere.AddItem .Fields("fldNom").Value
               .MoveNext
            Loop
            .Close
        End With
        oADORemplirList.Close
        Set oRSRemplirList = Nothing
        Set oADORemplirList = Nothing
    je m'excuse de poser tant de question mais c'est pour mon travail de fin d'année et j'y suis très accroché

    S'il faut d'autre information n'hésité pas a me le dire.

    Merci pour toute réponse

  2. #2
    Membre confirmé
    Profil pro
    Inscrit en
    Août 2005
    Messages
    72
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Août 2005
    Messages : 72
    Par défaut
    Si j'ai bien compris il faut que tu cree une requet a partir d'une listbox

    Donc tu cree ta requet dans ton Adodc puis tu le li a ta listbox.RowSource=Adodc et listbox.Datasource puis DataField et listField

  3. #3
    Membre éprouvé
    Avatar de khany
    Profil pro
    Inscrit en
    Octobre 2002
    Messages
    2 073
    Détails du profil
    Informations personnelles :
    Âge : 63
    Localisation : Belgique

    Informations forums :
    Inscription : Octobre 2002
    Messages : 2 073
    Par défaut
    Une petite recherche dans le forum répond déjà à beaucoup de questions, merci d'y songer ! Les tutoriels et la FAQ aussi peuvent être d'une grande aide afin de ne pas multiplier des questions ayant déjà une réponse

    http://www.developpez.net/forums/sho...d.php?t=335729

    Là, il s'agit de combo mais le principe est le même !

Discussions similaires

  1. [Débutant] Listbox qui dépend d'une autre listbox.
    Par Jackbalek dans le forum Interfaces Graphiques
    Réponses: 6
    Dernier message: 30/04/2014, 14h24
  2. [2012] Création table temporaire sur base d'une autre (table)
    Par tripper.dim dans le forum MS SQL Server
    Réponses: 8
    Dernier message: 28/05/2013, 14h51
  3. Réponses: 2
    Dernier message: 01/04/2008, 16h30
  4. requête dans un formulaire sur base d'une listbox
    Par biquet52 dans le forum VBA Access
    Réponses: 4
    Dernier message: 04/12/2007, 20h04
  5. Connexion SYSDBA sur une base ou une autre
    Par jack554 dans le forum Administration
    Réponses: 11
    Dernier message: 20/04/2004, 17h11

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo