Evo ti deo mog koda koji generiše JPG od bitmap objekta i šalje ga u response stream:
Code:
Public Shared Function GetEncoderInfo(ByVal mimeType As String) As ImageCodecInfo
Dim encoders() As ImageCodecInfo = ImageCodecInfo.GetImageEncoders()
Dim j As Integer
' locate encoder
For j = 0 To encoders.Length
If encoders(j).MimeType = mimeType Then Return encoders(j)
Next
' not found, return error
Return Nothing
End Function
....
Dim img as Bitmap
...
' set jpeg quality to 100%
Dim enc_params As EncoderParameters = New EncoderParameters(1)
Dim param1 As EncoderParameter = New EncoderParameter(Encoder.Quality, 100L)
enc_params.Param(0) = param1
' dump image to response stream
img.Save(Response.OutputStream, GetEncoderInfo("image/jpeg"), enc_params)
Nadam se da pomaže
Sloba je za 12 godina promenio antropološki kod srpskog naroda. On je od jednog
naroda koji je bio veseo, pomalo površan, od jednog naroda koji je bio znatiželjan, koji
je voleo da vidi, da putuje, da upozna,
od naroda koji je bio kosmopolitski napravio narod koji je namršten, mrzovoljan,
sumnjicav, zaplašen, narod koji se stalno nešto žali, kome je stalno neko kriv - Z.Đinđić