Printable View
This may sound confusing at first, but is there a way to display an image in a picturebox from a file directory, based on the image's filename in a database?
For example, one of the fields in my database is labeled "image", and it has "happy.jpg" in it.
Is there a way to read "happy.jpg" from the database field, match it to the image called "happy.jpg" in my Debug folder, and display that image in my picturebox?
Hello, here is a simple example where our data table is loaded statically but that is no different than what is returned from a OleDbConnection and OleDbCommand. There are three rows, only the second row has a image that exists in bin\debug.
Code:Private Function LoadDataSimilated() As DataTable
Dim dt As New DataTable("YourTable")
dt.Columns.Add("ID", GetType(Int32))
dt.Columns.Add("Image", GetType(String))
dt.Rows.Add(New Object() {1, "Cane_Lilies.gif"})
dt.Rows.Add(New Object() {2, "Candy_Cane_Lilies.gif"})
dt.Rows.Add(New Object() {3, "Candy_Cane_Lilies.gif"})
Return dt
End Function
Private Sub LoadImage()
Dim dt As DataTable = LoadDataSimilated()
Dim FileName As String = ""
For Each row As DataRow In dt.Rows
FileName = IO.Path.Combine(Application.StartupPath, row.Field(Of String)("Image"))
If IO.File.Exists(FileName) Then
Dim bm As New Bitmap(FileName)
PictureBox1.Image = bm
End If
Next
End Sub
Perhaps I need to be more specific.
My database file is named "game.accdb", it contains a table named "tblDecisions", has 7 rows, and a column titled "image" set to type Text.
The image fields all contain an image's full filename, such as happy.jpg and sad.jpg.
When the user clicks a button on my app, the id value changes accordingly; and based on the id's value, I want the picturebox in my app to display a picture depending on what the id is equal to.
For example, when the user clicks the button, id increases by 1. The picturebox should now contain the image from my debug folder based on the filename pulled from the "image" field in row 1.
When the user clicks the button again, id increases to 2. The picturebox should now contain the image from my debug folder based on the filename pulled from the "image" field in row 2.
Well, after messing around a bit I managed to do:
pictureBox.Image = Image.FromFile(Convert.ToString(dsStory.Tables("tblDecisions").Rows(id).Item("image")))
It works, so woohoo.
Pretty much the direction I lead you. To be safe you need to add the path as there may be times where something changes the home path from the app folder to another folder. Also I would suggest using the following which takes a bit more keystroke yet is strongly cast.Quote:
Originally Posted by Webberjo
Instead ofCode:PictureBox.Image = Image.FromFile(Convert.ToString(dsStory.Tables("tblDecisions").Rows(id).Field(Of String)("image")))
Also the method I used allows you to clean up memory by setting the bitmap to nothing after setting the image.Code:pictureBox.Image = Image.FromFile(Convert.ToString(dsStory.Tables("tblDecisions").Rows(id).Item("image")))