how to upload image in database(not path) in vb.net window

Question

how to upload image in database(not path) in vb.net window application

Pankaj Pandey · Answer

HELLO .. convert image into binary data and save it in database also save extension on that image . i have code to convert into binary and from binary to image, but it is in C#, but there are many website who convert c# to vb and vb to C#. there you can convert this code into vb and use it. http://www.c-sharpcorner.com/Blogs/11642/convert-image-into-a-binary-file-and-save-in-txt-file.aspx Mark as answered if usefull

Parveen Siwach · Answer

Hi, Go through this video tutorial, this will help you to solve your issue: http://www.youtube.com/watch?v=o5XboEfKGMY Also, you can try following code to "Save" Image in database: Dim con As New SqlConnection _ ("Server=YourServer;uid= ;pwd= ;database=northwind") Dim da As New SqlDataAdapter _ ("Select * From MyImages", con) Dim MyCB As SqlCommandBuilder = New SqlCommandBuilder(da) Dim ds As New DataSet() da.MissingSchemaAction = MissingSchemaAction.AddWithKey Dim fs As New FileStream _ ("C:\winnt\Gone Fishing.BMP", FileMode.OpenOrCreate, _ FileAccess.Read) Dim MyData(fs.Length) As Byte fs.Read(MyData, 0, fs.Length) fs.Close() con.Open() da.Fill(ds, "MyImages") Dim myRow As DataRow myRow = ds.Tables("MyImages").NewRow() myRow("Description") = "This would be description text" myRow("imgField") = MyData ds.Tables("MyImages").Rows.Add(myRow) da.Update(ds, "MyImages") fs = Nothing MyCB = Nothing ds = Nothing da = Nothing con.Close() con = Nothing MsgBox ("Image saved to database") and "Retrieve" Image from database: Dim con As New SqlConnection _ ("Server=YourServer;uid= ;pwd= ;database=northwind") Dim da As New SqlDataAdapter _ ("Select * From MyImages", con) Dim MyCB As SqlCommandBuilder = New SqlCommandBuilder(da) Dim ds As New DataSet() con.Open() da.Fill(ds, "MyImages") Dim myRow As DataRow myRow = ds.Tables("MyImages").Rows(0) Dim MyData() As Byte MyData = myRow("imgField") Dim K As Long K = UBound(MyData) Dim fs As New FileStream _ ("C:\winnt\Gone Fishing2.BMP", FileMode.OpenOrCreate, _ FileAccess.Write) fs.Write(MyData, 0, K) fs.Close() fs = Nothing MyCB = Nothing ds = Nothing da = Nothing con.Close() con = Nothing MsgBox ("Image retrieved")

how to upload image in database(not path) in vb.net window

Answers (2)