[2005] Thumbnails

[danasegarane]

Dear All,
How to show a image from the Database as a Thumbnails.I am using this code
to display the image from database.How to shrink the image to fit to the picturebox.

Private Function ShowImageandDetailsFromDB(ByVal iErrorID As Long)
        Dim imagecmd As OleDbCommand = New OleDbCommand("Select Top 1 Error_Description,Error_Image from photos where Error_ID='" & iErrorID & "'", con)
        Dim imagereader As OleDbDataReader
        imagereader = imagecmd.ExecuteReader
        imagereader.Read()
        Dim b(imagereader.GetBytes(1, 0, Nothing, 0, Integer.MaxValue) - 1) As Byte
        imagereader.GetBytes(1, 0, b, 0, b.Length)
        imagereader.Close()
        Dim ms As New System.IO.MemoryStream(b)
        picError.Image = Image.FromStream(ms) 'PicError it the Picturebox
 
    End Function

I want to show the image as Thumbnail

Dana

[gigemboy]

You could create a new bitmap at the size you need, and then draw the image onto it. This question has been asked several times before, if you would search for "create thumbnails" or something to that extent. There is even an example in the codebank if you look there.

[RobDog888]

Search the forums (vb.net and vb.net codebank) for MrPolite's threads on thumbnails. He has done allot in this area.