Discussion :

[jlion5]

Slt je viens vous soliciter car j'ai une probleme
je suis en train de construire une listbox alimenter par une base de donnée.
mais list1.additem est souligne me disant
Erreur 1 'AddItem' n'est pas un membre de 'System.Windows.Forms.ListBox'.
peu etre aussi elle est mal faite mais je suis tous ouïe a vos proposition.

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
 
Dim con As New ADODB.Connection
        Dim rs As New ADODB.Recordset
      rs = New ADODB.Recordset
        con = New ADODB.Connection
        con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\Lionel ML\Documents\Visual Studio 2008\Projects\Gestion parc informatique\Gestion parc informatique\gpi.mdb"
        con.Open()
        'Exécution de la requête
        rs.Open("SELECT * FROM marque ", con)
        Do While rs.EOF = False
            List1.AddItem(rs![marque])
            rs.MoveNext()
        Loop
        con.Close()

j'espere que vous vourrez m'aidez
j'utilise VB 2008 Express peu etre se sera utile lol

[Danyel]

Je vais te donner la solution, mais avant cela, je te donne le conseil d'aller voir directement sur msdn, les structures et les proprietes de l'objet qui te pose probleme.
Dans 98% des cas, tu vas trouver la solution en 2 minutes
http://msdn.microsoft.com/en-us/libr...ox(VS.80).aspx

Sinon pour ajouter dans un listbox :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

listBox1.Items.Add()

[jlion5]

slt merci d'avoir repondu aussi vite
il fallai que j'ajoute

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

List1.Items.Add(rs.Fields(1).Value)

merci encore!!!

[jlion5]

dsl de vous solicite encore une fois mais au lieux de faire une listbox je voudrais faire une listview
mais c pas aussi simple que ca enfin pour moi j'ai regarde quelque exemple sur le net (ya pas beaucoup) mais a chaque fois ca cole pas.
j'ai essayé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
While Not rs.EOF
                ListView1.Items(0).SubItems(0) = rs.Fields("n°")
                ListView1.Items(0).SubItems(1) = rs.Fields("marq")
                rs.MoveNext()
            End While

mais ca me dis:
invalidArgument=la valeur '0' n'est pas valide pour index
Nom du parametre: index

mais je voudrai faire un listview du style
n° | marq
----------
1 | IBM
2 | CANON
etc..

j'espere que j'ai ete precis

[Danyel]

Encore une fois, meme reponse
http://msdn.microsoft.com/en-us/libr....listview.aspx
Ensuite tu regardes pour ajouter des elements.

[jlion5]

slt Damyel merci pour le lien mais c'etait pas trop clair leur explication, mais j'ai fini par trouver grace a http://plasserre.developpez.com/v3-7.htm
merci encore!!

[Danyel]

Le lien que je t'avais donne est le lien de la fonction sur msdn que tu voulais utiliser avec toutes les infos necessaires à son utilisation (certes en anglais )
Si ton post est termine, pense au tag merci