pls house,

i need a vb.net code to retreive image from sql server using vb.net.I want to display the image using picturebox.excerpt from my sql query;

mycmd = New SqlCommand("select picture from biodata where id='" & TextBox2.Text & "'"

Hey man, i like this language.
Can you pls do me a favor to tell me where you learnt it from.

Well. . . . you are sort of on the right track but you need to learn some basics on accessing databases and retrieving information @Poster. You also need to know how to access information contained in resultsets returned to you. May I suggest you spend at least 8 hours focusing on ADO.NET data retrieval? I mean we could try to write your code for you over the next couple of days. But I think you can get better information if you put your head into a good chapter on ADO.NET, DataReaders/DataSets, DataTables, DataRows, DataColumns, SqlCommand and related objects.

Its actually a straight forward process. Follow the following steps. However the following codes basically scans ur computer for .JPEG file extensions and adds them direct to ur SQLSERVER. But ofcourse u can decide to import the image in a picture box control prior saving it in the database.
Create a table named "ImageData"Its attributess are

Name (varChar50)
Picture  (Image)
CreateDate(varChar20)--'NOT REALLY NECCESSARY

Now in your Form,
You will need  2 buttons named btnSave and BtnSearch, textbox (txtName)

For the clicked event of btnSearch, add these codes
Dim pictureLocation As String
        Dim a As New OpenFileDialog
        a.Filter = ("Image files| *.JPG"
        pictureLocation = a.FileName
       
            a.ShowDialog()
            Using conn As New System.Data.SqlClient.SqlConnection("[s]Data Source=DENSMAN-PC\SQLEXPRESS;Initial Catalog=aba;Integrated Security=True[/s]" 'Insert ur connection string here
                conn.Open()

                Using cmd As New SqlClient.SqlCommand("Insert Into ImageData(Name, CreateDate, Picture) Values (@Name, @CreateDate, @Picture)", conn)
                    cmd.Parameters.Add(New SqlClient.SqlParameter("@Name", SqlDbType.VarChar)).Value = txtName.Text
                    cmd.Parameters.Add(New SqlClient.SqlParameter("@CreateDate", SqlDbType.VarChar)).Value = DateTime.Today
                    cmd.Parameters.Add(New SqlClient.SqlParameter("@Picture", SqlDbType.Image)).Value = IO.File.ReadAllBytes(a.FileName)
                    cmd.ExecuteNonQuery()
                End Using


            End Using
       
When you are done with the following, i can tell u other ways to modify and optimise your programme, then i will give u the second part once u get this working. Cheers

Hi Ababoi,

Weldone. But i need second part of the code, and how to modify and optimise the code. Please, let the second part follow the trent you used in the first part. I need it urgently. demola4infotekk@yahoo.com

Omosilade:

Hi Ababoi,

Weldone. But i need second part of the code, and how to modify and optimise the code. Please, let the second part follow the trent you used in the first part. I need it urgently. demola4infotekk@yahoo.com

other ways you can modify the code includes searching and displaying an image using the values of a textbox.
The second part of the code is to display the image from the database (assuming that you have actually created the imageData table and contain values). You will need
picturebox, image1,
textbox , textbox1
then
under the button to display the image ::
'Read an image
Using conn As New System.Data.SqlClient.SqlConnection("[s]Data Source=DENSMAN-PC\SQLEXPRESS;Initial Catalog=aba;Integrated Security=True[/s]" 'insert ur connection string
conn.Open()
Using cmd As New SqlClient.SqlCommand("Select Name, CreateDate, Picture From ImageData", conn)
Using dr As SqlClient.SqlDataReader = cmd.ExecuteReader()
Using dt As New DataTable
dt.Load(dr)
Dim row As DataRow = dt.Rows(0)
Dim sName As String = Convert.ToString(row("Name")
Dim dtCreateDate As DateTime = Convert.ToDateTime(row("CreateDate")
Using ms As New IO.MemoryStream(CType(row("Picture", Byte()))

Dim img As Image = Image.FromStream(ms)
Image1.Image = img
End Using
TextBox1.Text = ("Loaded image " + sName)
End Using
End Using
End Using
End Using

Goodluck try it and if not working reply and show ur error. Else notify when it is working

End Sub

Salamsy aint sure these guys really understand your needs, perhaps I, too. 88 hours with ADO.NET might not fetch u this. There are 2 ways:

1. You can save/retrieve image directly into/from a table in ur SQL db (the image must have been converted to binary type).

2. You can also save the path or filename of the JPEG images as normal strings (Varchar); this is much easier and looks like what ur querry was driving at.

Option 1 is more advanced and seems a little more complicated; but it's actually the real life thing. There has been arguments about which is better from professionals' point of view and they raise sensible points.

Have it at the back of ur mind that saving image in ur database contributes immensely to the rapid growth of ur DB size.

And, Is ur app an Enterprise one or get-me-on?

Regards

hi ABAboi ,

Thanks for your coding which really helped me. Continuation to your post, i would like to request you to kindly include a code for SAVE button, since you have included this command in SEARCH button. Can you please add a code for SEARCH button to load the file to picture box and SAVE button to save the information to TABLE.

Thanks,

Thanks alot for this code, it really helped.
But can you please give us code to delete, it won't allow the usual delete method i'm used to, the delete code keeps ti ming out probably because of the picture involved now. Please i would appreciate if you could give a delete code. Thank you sir.

ABAboi:

other ways you can modify the code includes searching and displaying an image using the values of a textbox.
The second part of the code is to display the image from the database (assuming that you have actually created the imageData table and contain values). You will need
picturebox, image1,
textbox , textbox1
then
under the button to display the image ::
'Read an image
Using conn As New System.Data.SqlClient.SqlConnection("[s]Data Source=DENSMAN-PC\SQLEXPRESS;Initial Catalog=aba;Integrated Security=True[/s]" 'insert ur connection string
conn.Open()
Using cmd As New SqlClient.SqlCommand("Select Name, CreateDate, Picture From ImageData", conn)
Using dr As SqlClient.SqlDataReader = cmd.ExecuteReader()
Using dt As New DataTable
dt.Load(dr)
Dim row As DataRow = dt.Rows(0)
Dim sName As String = Convert.ToString(row("Name")
Dim dtCreateDate As DateTime = Convert.ToDateTime(row("CreateDate")
Using ms As New IO.MemoryStream(CType(row("Picture", Byte()))

Dim img As Image = Image.FromStream(ms)
Image1.Image = img
End Using
TextBox1.Text = ("Loaded image " + sName)
End Using
End Using
End Using
End Using

Goodluck try it and if not working reply and show ur error. Else notify when it is working

End Sub

Ababoi u r 2 much, tumbs up 4 ur codes.
Pls I hav bin looking 4 a way 2 to link an invoice app to sql server database so as manage my small business inventory. I' ll be glad if u will help me with that, tanx in advance.

dotzok:
Salamsy aint sure these guys really understand your needs, perhaps I, too. 88 hours with ADO.NET might not fetch u this. There are 2 ways:

1. You can save/retrieve image directly into/from a table in ur SQL db (the image must have been converted to binary type).

2. You can also save the path or filename of the JPEG images as normal strings (Varchar); this is much easier and looks like what ur querry was driving at.

Option 1 is more advanced and seems a little more complicated; but it's actually the real life thing. There has been arguments about which is better from professionals' point of view and they raise sensible points.

Have it at the back of ur mind that saving image in ur database contributes immensely to the rapid growth of ur DB size.

And, Is ur app an Enterprise one or get-me-on?

Regards

Kudoz 2 ur contributions. Pls I'm havin challenges creating and managing my small business inventory system. I' ll be most grateful if u aid me on how to go about creating invoice and linking it to my SQL server database. Tnx

Please I need someone who can help out with ID card with barcode software such that the details of the ID card owner can be gotten if the Card is scanned.you must be base in porthacourt,it's urgent.contact me..07035812808

King1982:
Please I need someone who can help out with ID card with barcode software such that the details of the ID card owner can be gotten if the Card is scanned.you must be base in porthacourt,it's urgent.contact me..07035812808

Chatting you already .