Afficher une image d'un champ BLOB de bdd dans un picturebox

Bonjour,

Je fais une appli VB > Oracle et j'ai fait une procédure de remplissage d'un combobox avec une requête sql

Code:

---

1 2 3 4 5 6 7

Public Sub remplirDGV(ByRef dgv As DataGridView, ByVal strSQL As String) Try dgv.DataSource = retourneDS(strSQL).Tables("info") Catch ex As Exception MessageBox.Show("Impossible de remplir la liste. " & ex.Message) End Try End Sub

---

Jusque la tout va bien, ca fonctionne et ca me permet de faire des appels du type :

Citation:

---

remplirDGV(dgv_MonDatagrid, "select champ1, champ2 from table where pk = maPk")

---

Maintenant dans une autre de mes table j'ai un champ BLOB qui contient des images et j'aimerai faire le même genre de procédure afin de remplir un picturebox en faisant un appel du type :

Citation:

---

remplirPI(pi_MonPictureBox, "select champImage from table where pk = maPk")

---

J'ai essayé de faire

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Public Sub remplirPI(ByRef pi As PictureBox, ByVal strSQL As String) Dim ds As DataSet = New DataSet("info") Dim oleCom As OracleCommand Dim Oleda As New OracleDataAdapter   oleCom = New OracleCommand(strSQL, orclConnexion) Oleda.SelectCommand = oleCom ds.Clear() Oleda.Fill(ds, "info") pi.Image = ds.Tables("info").Rows(0).Item("ima_image") End Sub

---

mais j'obtiens l'erreur :

Citation:

---

Unable to cast object of type 'System.Byte[]' to type 'System.Drawing.Image'.

---

Voila si quelqu'un pouvait m'aider ce ce serait sympa :ccool:

Hello!
Créer un MemoryStream, le remplir avec ton contenu (ton byte[]) et utiliser le constructeur de System.Drawing.Bitmap qui prend un stream ( cf ici )

Merci
Mais pourriez vous m'en dire un peu plus svp ?

J'ai essayé ceci :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Public Sub remplirPI(ByRef pi As PictureBox, ByVal strSQL As String) Dim ds As DataSet = New DataSet("info") Dim oleCom As OracleCommand Dim Oleda As New OracleDataAdapter Dim stmBLOBData As New System.IO.MemoryStream   oleCom = New OracleCommand(strSQL, orclConnexion) Oleda.SelectCommand = oleCom ds.Clear() Oleda.Fill(ds, "info") stmBLOBData = ds.Tables("info").Rows(0).Item("ima_image") pi.Image = Image.FromStream(stmBLOBData) End Sub

---

Mais ca ne fonctionne pas j'ai encore une erreur
Merci d'avance

Je connais qu'en C# mais ca donne:

Code:

---

1 2 3 4 5

var stmBLOBData = new System.IO.MemoryStream(); byte[] buffer = ds.Tables["info"].Rows[0].Item["ima_image"]; stmBLOBData.Write(buffer, 0, buffer.Length); pi.Image = new System.Drawing.Bitmap(stmBLOBData);

---

Pas testé mais devrait fonctionner.

Oui ton idée était bien la bonne. Et pour la mettre en place en VB j'ai fait comme expliqué sur cette page, et ça fonctionne nickel :
convert datatable byte array to image

:mouarf:

Merci PitMaverick78

Avec plaisir :D