mostrar imagen en un picture que esta guardada en una base de datos en acces

[rishart]

hola amigos como le puedo hacer para mostrar la imagen contenida en la base de datos en acces en un picture?

alguien podria ayudarme, les agradezco de antemano y les envio un cordial saludo...

[Trulala de cordoba]

bueno la cosa sería mas o menos ati:

Código:

Public Function GetImageFromDB(ByRef imageName As String) As Bitmap
    Try
        Dim conn As New OleDb.OleDbConnection
        Dim cmd As OleDb.OleDbCommand
        Dim reader As OleDb.OleDbDataReader

        conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\YourDBFile.mdb;User Id=YourUsername;Password=YourPassword;"
        conn.Open()

        cmd = conn.CreateCommand()
        cmd.CommandText = "SELECT YourColumnName FROM YourTable WHERE ColumnName = '" & imageName & "'"
        reader = cmd.ExecuteReader

        If reader.Read Then
            Dim imgByteArray() As Byte
            Try
                imgByteArray = CType(reader(0), Byte())
                Dim stream As New System.IO.MemoryStream(imgByteArray)
                Dim bmp As New Bitmap(stream)
                stream.Close()
            Catch ex As Exception
                MessageBox.Show(ex.Message)
                Return Nothing                    
            End Try
        End If

        reader.Close()
        conn.Close()

        cmd.Dispose()
        conn.Dispose()
        
        Return bmp            
    Catch ex As Exception
        MessageBox.Show(ex.Message)
        Return Nothing            
    End Try
End Function

Esa es la función. Luego en el botón o en algun lado para ponerle la imagen al picture:


PictureBox1.Image = GetImageFromDB(TextBox1.Text)


TextBox1.Text es una caja de texto donde ingresas el nombre de la foto pero lo podrías adaptar para mander el ID de la foto u otro.
Espero te sea útil