Discussion :

[Invité]

bonjour,
je suis en train de développer une application sous visual studio 2010, j'ai bien pu stocker des images dans la base de données SqlServer sous format de byte, maintenant je veux afficher ces images dans une picturebox .
j'ai crééé une fonction de conversion de byte en image :

Code :

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

1
2
3
4
5
6
 Public Shared Function StreamToImage(ByVal buff As Byte()) As Image
 
        Dim ms As New MemoryStream(buff)
        Dim img As Image = Image.FromStream(ms)
        Return img
    End Function

après j'ai fait ce 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
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Try
            strSql = "SELECT logo,anneeConstitution,capital,numRC,typologieConsortium,typolopgieEntreprise,adresse,email,siteWeb,nomSA,nomFJ,nomPresident,dateCreation,remarque FROM dbo.consortium " & "WHERE nomConsortium = '" & TextBox1.Text & "' "
            cmd = New SqlCommand(strSql, connexion)
            cmd.Connection() = connexion
            cmd.ExecuteNonQuery()
            Dim reader As SqlDataReader
            reader = cmd.ExecuteReader
            While reader.Read()
                PictureBox1.Text = "ici le probleme"
                TextBox2.Text = reader.GetInt16(1)
                TextBox3.Text = reader.GetInt32(2)
                TextBox4.Text = reader.GetInt32(3)
                TextBox5.Text = reader.GetString(4)
                TextBox6.Text = reader.GetString(5)
                TextBox7.Text = reader.GetString(6)
                TextBox8.Text = reader.GetString(7)
                TextBox9.Text = reader.GetString(8)
                TextBox10.Text = reader.GetString(9)
                TextBox11.Text = reader.GetString(10)
                TextBox12.Text = reader.GetString(11)
                TextBox13.Text = reader.GetDateTime(12)
                TextBox14.Text = reader.GetString(13)
            End While
            reader.Close()
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub

est ce que vous avez une idée et merci

[tomlev]

Code :

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

PictureBox.Image = StreamToImage(DirectCast(reader.GetValue(0), Byte()))

[Invité]

merci c'est résolu