Bonjour, le sujet est dans l'intitulé du message. Tout simplement je n ariive pas a remplir une liste d'une base de données Access.

Voici le code :
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
29
30
31
 Dim i As Integer
                    Dim Listbox1 As New ComboBox
                    While cRepertoire <> ""
                        dsFB.Clear()
                        '    MsgBox("Dans Manu " & cRepertoire & "  " & cKey)
                        istat = Get_Private_Profile_String(cRubrique, cKey, "", cRepertoire, cIniFile)
                        cRepertoire = cRepertoire.Replace("n", "")
                        cKey = CType(Val(cKey) + 1, String)
                        Listbox1.Items.Add(cRepertoire)
                    End While
                    SQLadd = "SELECT * FROM  Liste_FB "
                    cmd.CommandText = SQLadd
                    cmd.Connection = cn
                    cmd.ExecuteNonQuery()
                    cbListeFB = New OleDbCommandBuilder(da1)
                    da1.SelectCommand = cmd
                    da1.Fill(dsFB, "ListeFB")
                    dtt = dsFB.Tables("ListeFB")
                    Dim j As Integer
 
                    For i = 0 To dtt.Rows.Count - 1
                        For j = 0 To Listbox1.Items.Count - 2
 
                            MsgBox(Listbox1.Items(j))
                            dsFB.Tables("ListeFB").Rows(i).Item("FB_ID_format") = Listbox1.Items(j)
                            'dsFB.Tables("ListeFB"). = Listbox1
                        Next
                        'dtt = dsFB.Tables("ListeFB")
                    Next
                    da1.Update(dsFB, "ListeFB")
                    dsFB.AcceptChanges()
J'ai comme résultat le remplissage de la colonne de seulement le dernier item de la Listview. Alors que je parcours bien la ListView et que je rempli la colonne. Mais la valeur est ecrasé sur le premier index. Et je ne voi pas comment changé d'index.
Pour info les valeurs de la ListVIew sont issu d'un fichier de parametrage .ini.
Merci de votre aide.