Related:
- Display image on pictureBox using the image path stored on DB
- Excel display image from file path - How-To - Excel
- Internet explorer not displaying images - How-To - Internet Explorer
- Display image response.binarywrite ✓ - Forum - Programming
- Saving image path to access database and retrieving images ✓ - Forum - Programming
- C display image ✓ - Forum - Programming
2 replies
Zohaib R
- Posts
- 2368
- Registration date
- Sunday September 23, 2012
- Status
- Member
- Last seen
- December 13, 2018
Hi mikeoe2003,
Create a form with the controls shown in the below mentioned image:
http://img43.imageshack.us/img43/4668/formsh.jpg
Create a Database with the name Databasemikeoe2003PictureApplication.mdb (see the image below for the design of the Database):
http://img846.imageshack.us/img846/6905/databaseb.jpg
Paste the below mentioned code in the Click event of ButtonSelect:
Dim cnn As New OleDb.OleDbConnection
cnn = New OleDb.OleDbConnection
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Databasemikeoe2003PictureApplication.mdb;"
If cnn.State = ConnectionState.Open Then
cnn.Open()
End If
Dim da As New OleDb.OleDbDataAdapter("SELECT * FROM Tablemikeoe2003PictureApplication WHERE Id = " & TextBoxPictureID.Text, cnn)
Dim dt As New DataTable
da.Fill(dt)
Me.TextBoxPictureFilePath.Text = dt.Rows(0).Item("PicturePath")
cnn.Close()
PictureBox1.Image = System.Drawing.Bitmap.FromFile(TextBoxPictureFilePath.Text)
Run the application and check for the results.
Do reply with results.
Create a form with the controls shown in the below mentioned image:
http://img43.imageshack.us/img43/4668/formsh.jpg
Create a Database with the name Databasemikeoe2003PictureApplication.mdb (see the image below for the design of the Database):
http://img846.imageshack.us/img846/6905/databaseb.jpg
Paste the below mentioned code in the Click event of ButtonSelect:
Dim cnn As New OleDb.OleDbConnection
cnn = New OleDb.OleDbConnection
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Databasemikeoe2003PictureApplication.mdb;"
If cnn.State = ConnectionState.Open Then
cnn.Open()
End If
Dim da As New OleDb.OleDbDataAdapter("SELECT * FROM Tablemikeoe2003PictureApplication WHERE Id = " & TextBoxPictureID.Text, cnn)
Dim dt As New DataTable
da.Fill(dt)
Me.TextBoxPictureFilePath.Text = dt.Rows(0).Item("PicturePath")
cnn.Close()
PictureBox1.Image = System.Drawing.Bitmap.FromFile(TextBoxPictureFilePath.Text)
Run the application and check for the results.
Do reply with results.
But you done the superb job. Heads off to you
quite smile
Thank you soo much
thankyou