Accueil > > > EXTRAIRE LES IMAGES DE VOTRE BDD ACCESS DANS UN LISTVIEW
EXTRAIRE LES IMAGES DE VOTRE BDD ACCESS DANS UN LISTVIEW
Information sur la source
Description
Je voulais extraire les images contenues dans une des colonnes de ma BDD Access dans une ListView mais je n'ai rien trouvé à ce sujet. J'ai donc planché là dessus et pondu un petit code. Une Form + un splitter container. L'un des containers contient une PictureBox ancrée et l'autre une ListView (LvTest)avec une ImageList.
Source
- Dim con As New OleDb.OleDbConnection
- con.ConnectionString = "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source =" & My.Application.Info.DirectoryPath & "\Votre BDD.mdb"
- con.Open()
- Dim ds As New DataSet
- Dim da As OleDb.OleDbDataAdapter
- Dim sql As String
- sql = "SELECT * FROM nom de la table"
- da = New OleDb.OleDbDataAdapter(sql, con)
- da.Fill(ds, "test")
-
-
- ImageList1.Images.Clear()
- ListView1.Items.Clear()
-
- Try
- Dim i As Integer
- For i = 0 To ds.Tables("test").Rows.Count - 1
- If ds.Tables("test").Rows(i).Item(le numéro de
- la colonne) is DBNull.Value Then
- Dim ImageNull As Image
- ImageNull = My.Resources.ImageNull 'image que vous avez créé et qui se trouve dans vos fichiers resources
- Me.ImageList1.Images.Add(ImageNull, Nothing)
- Dim photo1 As ListViewItem = New ListViewItem("Ce que vous voulez", i)
- Me.LvTest.Items.Add(photo1)
- Else
- Dim x As Byte() = ds.Tables("test").Rows(i).Item(le numéro de la colonne)
- Dim image As Image
- image = TypeDescriptor.GetConverter(GetType(Image)).ConvertFrom(x)
- Me.ImageList1.Images.Add(image, Nothing)
- Dim photo2 As ListViewItem = New ListViewItem("Ce que vous voulez", i)
- Me.LvPièce.Items.Add(photo2)
- End If
- Next
-
- Catch ex As Exception
- MsgBox(ex, MsgBoxStyle.Information)
- End Try
- con.Close()
Dim con As New OleDb.OleDbConnection
con.ConnectionString = "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source =" & My.Application.Info.DirectoryPath & "\Votre BDD.mdb"
con.Open()
Dim ds As New DataSet
Dim da As OleDb.OleDbDataAdapter
Dim sql As String
sql = "SELECT * FROM nom de la table"
da = New OleDb.OleDbDataAdapter(sql, con)
da.Fill(ds, "test")
ImageList1.Images.Clear()
ListView1.Items.Clear()
Try
Dim i As Integer
For i = 0 To ds.Tables("test").Rows.Count - 1
If ds.Tables("test").Rows(i).Item(le numéro de
la colonne) is DBNull.Value Then
Dim ImageNull As Image
ImageNull = My.Resources.ImageNull 'image que vous avez créé et qui se trouve dans vos fichiers resources
Me.ImageList1.Images.Add(ImageNull, Nothing)
Dim photo1 As ListViewItem = New ListViewItem("Ce que vous voulez", i)
Me.LvTest.Items.Add(photo1)
Else
Dim x As Byte() = ds.Tables("test").Rows(i).Item(le numéro de la colonne)
Dim image As Image
image = TypeDescriptor.GetConverter(GetType(Image)).ConvertFrom(x)
Me.ImageList1.Images.Add(image, Nothing)
Dim photo2 As ListViewItem = New ListViewItem("Ce que vous voulez", i)
Me.LvPièce.Items.Add(photo2)
End If
Next
Catch ex As Exception
MsgBox(ex, MsgBoxStyle.Information)
End Try
con.Close()
Conclusion
J'ai insérer une image DBNull car sinon vous générez une erreur quand l'une des rows ne contient rien (DbNull.Value retourne 0)
Sources du même auteur
Sources de la même categorie
Commentaires et avis
Discussions en rapport avec ce code source dans le forum
Utilisation du contrôle ImageList associé à 1 ListView! [ par Nico ]
Lorsque je veux ajouter une ligne au ListView, je recois un msg d'erreur qui me dit:"ImageList doit être initialisé avant de pouvoir être utilisé.". J
deplacement dans une listview [ par jollyJumper ]
voila le probleme :j'ai une listview ou j'affiche des noms de données tirées d'une base ACCESS,et à côté j'ai placé deux boutons,un pour monter l'élém
Besoin d'aide sur LISTVIEW sous ACCESS 2000 [ par alain ]
SUR UN FORM, j'ai un control LISTVIEW (en lwReport):je voudrais trier les lignes sur les valeurs de la colonne sur laquelle j'ai cliquée.Comment faire
Besoin d'aide sur LISTVIEW sous ACCESS 2000 [ par alain ]
SUR UN FORM, j'ai un control LISTVIEW (en lwReport):je voudrais trier les lignes sur les valeurs de la colonne sur laquelle j'ai cliquée.Comment faire
Besoin d'aide sur LISTVIEW sous ACCESS 2000 [ par alain ]
SUR UN FORM, j'ai un control LISTVIEW (en lwReport):je voudrais trier les lignes sur les valeurs de la colonne sur laquelle j'ai cliquée.Comment faire
chargement d'une listview à partir d'une imagelist [ par lamorike ]
Salut,je n'arrive pas à charger la listview avec l'image contenue dans le contrôle imagelist.Si quelqu'un à un code, je serai contente de pouvoir en p
Effacer un ImageList [ par SupraDolph ]
j'utilise un ListView avec la proprietée View = lvwIcon .Pour afficher les icones dans le listView j'utilise un ImageList.je veux pouvoir effacer les
imagelist et listview arrrrrr [ par Stephane ]
Salut a tousCa fait un moment que je galere dessus et j'ai pas encore trouvé de remède. Peut être une lumière pourra m'éclairer ?voila, j'ai un listvi
MDI FORM + listview + imagelist AU SECOURS §§§§§§ [ par sal ]
Bonjour a tous, j'ai un big pb avec un imagelist et une form mdi.sur la form mdi j'ai mis un imagelist , j arrive a mettre des images dedans.et sur un
|
Derniers Blogs
GESTION D'EXCEPTION AVEC LES TASKSGESTION D'EXCEPTION AVEC LES TASKS par richardc
Nous avons vu dans un précédent article comment utiliser Task pour effectuer des opérations dans un autre thread.
Malheureusement, comme tout le monde n'est pas parfait, il se peut que cette exécution se passe mal et qu'une exception se produise.
La...
Cliquez pour lire la suite de l'article par richardc DéMARRONS AVEC LES TASKSDéMARRONS AVEC LES TASKS par richardc
Que vous le vouliez ou non, le développement multi-tâche est maintenant une obligation pour toute nouvelle application. Il est donc vital d'en comprendre les mécanismes et de s'y mettre le plus tôt possible.
En attendant le .NET Framework 4.5 avec le...
Cliquez pour lire la suite de l'article par richardc SLIDE & DéMO TECHDAYS 2012 - FAST & FURIOUS XAML APPSSLIDE & DéMO TECHDAYS 2012 - FAST & FURIOUS XAML APPS par Vko
Retrouvez les slides et les démo de ma session Fast & Furious XAML Apps. A ceux qui se posent la question : "est-ce que le code de la DataGrid est disponible?", je vous répondrais "pas encore". Je vais mettre en place un projet codeplex pour part...
Cliquez pour lire la suite de l'article par Vko XNA IS DEAD!XNA IS DEAD! par richardc
Depuis la semaine dernière (et grâce aux TechDays 2012), je me penche activement sur la nouvelle version de Windows, aka Windows 8. Vous me direz, il était temps puisque la première preview date de Septembre dernier.
OK. Remarquez, on n'en est qu'aux...
Cliquez pour lire la suite de l'article par richardc TECHDAYS PARIS 2012 : WINDOWS SERVER "8" QUOI DE 9 !TECHDAYS PARIS 2012 : WINDOWS SERVER "8" QUOI DE 9 ! par ROMELARD Fabrice
Speakers: Fabrice Meillon et Stanislas Quastana Cette session est basée entièrement sur celle donnée lors de la BUILD cet hiver. Il n'y a pas d'ajout d'information en rapport avec cet évènement passé. Windows 8 Server sera intégralem...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice
Logiciels
DocTranslate (V3.1.0.0)DOCTRANSLATE (V3.1.0.0)DocTranslate est un traducteur de document Microsoft Word, PowerPoint et Excel. Il permet d'autom... Cliquez pour télécharger DocTranslate Tribler (2012)TRIBLER (2012)Tribler est un client pair à pair (P2P/Peer-to-Peer) open source avec la capacité de regarder des... Cliquez pour télécharger Tribler OneSwarm (2012)ONESWARM (2012)Le peer-to-peer qui protège votre vie privée, c'est OneSwarm.
Ce logiciel de peer-to-peer crypté... Cliquez pour télécharger OneSwarm PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO Academy System (17.2.1.0)ACADEMY SYSTEM (17.2.1.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System
|