Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
Interested to Buy Any Domain ? << Click Here >> for more details...

How to store jpeg / gif / bmp image in database and how to
retrieve them? The most stressful condition is database is
distributed and stored images can be retrive from any
computer in network and any one can store images from other
computer!! plss help its urgent.......RAHUL RATHOD

Answer Posted / debolina

For Save Images:

Private Sub Save()
Dim strConn, strQuery As String
Dim cmd As SqlCommand
Dim img As Image
Dim imagedata As Byte()
Dim imgFormat As Imaging.ImageFormat
Dim myParameter As SqlParameter
Try
img = Image.FromFile(Me.txtImage.Text)
imgFormat = img.RawFormat

imagedata = ConvertImageToByteArray(img, imgFormat)

strQuery = "Insert into TBL_STUDENT
(STUD_NAME,SUBJECT,NUMBER,IMAGES) values ('" & txtName.Text
& "','" & txtSubject.Text & "'," & txtNumber.Text & ",@Image)"
strConn = //Your Connection String
conn = New SqlConnection(strConn)
cmd = New SqlCommand(strQuery, conn)

myParameter = New SqlParameter("@Image",
SqlDbType.Image, imagedata.Length)
myParameter.Value = imagedata
cmd.Parameters.Add(myParameter)


conn.Open()
cmd.ExecuteNonQuery()

MsgBox("Saved Successfully", MsgBoxStyle.OkOnly)
Catch ex As Exception

End Try
End Sub

Private Shared Function ConvertImageToByteArray(ByVal
imageToConvert As System.Drawing.Image, ByVal formatOfImage
As Imaging.ImageFormat) As Byte()
Dim Ret As Byte()

Try
Using ms As New MemoryStream()
imageToConvert.Save(ms, formatOfImage)
Ret = ms.ToArray()
End Using
Catch generatedExceptionName As Exception
Throw
End Try

Return Ret
End Function

For Retrieve:

Private Sub RetrieveImages()
Dim strConn As String
Dim cmd As SqlCommand
Dim da As SqlDataAdapter

Try
strConn = //Connection string
conn = New SqlConnection(strConn)
cmd = New SqlCommand("Select * from
TBL_STUDENT", conn)
da = New SqlDataAdapter(cmd)
ds = New DataSet
da.Fill(ds)
Catch ex As Exception

End Try
End Sub

Is This Answer Correct ?    4 Yes 1 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Explain the advantages of migrating to vb.net?

1023


What is sealed class?

1133


Explain about garbage collection?

991


Tell us how many languages are supported by .net?

926


Explain jagged array in vb.net?

986


What is the differences between dataset.clone and dataset.copy?

1121


Define naming convention?

1013


Explain convert.tostring and i.tostring method?

917


What do you understand by vb.net?

1041


described weak typing?

1030


Write a VB.Net console program to check whether a number is perfect or not.

7812


Explain the advantage of option strict on?

926


What is the difference between static or dynamic assemblies?

1018


What is the difference between a "jagged array" and multidimensional array" ?can anyone show me it practically ?

976


Explain the difference between an xml "fragment" and an xml "document."

908