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
- Moderator
- 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.
Subscribe To Our Newsletter!
DON'T MISS
- How to Get More Followers on Instagram
- How to Get Free Diamonds in Free Fire
- Facebook Code Not Received
- How to Recover Your Yahoo Account
- How to Fix a Blurry Snapchat Video
- How to Recover a Disabled Facebook Account
- How to Install a VPN
- How to Create a Gmail Account
- Computer Boots to Black Screen
- How to Disabled Write Protection on a USB
- How to Upload High Quality Photos to Instagram
But you done the superb job. Heads off to you
quite smile
Thank you soo much
thankyou