User-954049702 posted
The ASP.NET code below worked fine under v1.1 of the framework.
Basically, it takes an image file that is uploaded (via a web form)
and saves a thumbnail of that file to a temporary directory.
The web server has write permissions to the directory, so that
is NOT the issue.
The code below was compiled under v2.0 of the Framework and
now whenever the code runs we receive the following:
System.Runtime.InteropServices.ExternalException: A generic error occurred in GDI+. at System.Drawing.Image.Save(String filename, ImageCodecInfo encoder, EncoderParameters encoderParams)
According to the run-time error, the error occurs on the following line:
fin_img.Save( img_file_spec, img_codec, encoder_params )
Can someone please point out why code that ran under v1.1 is no longer running under v2.0??
And more importantly, if you see an obvious fix to the code, please reply!!
Thanks!
==========================================================
dim posted_fileobj as HttpPostedFile
dim img_file_stream as FileStream
dim src_img as System.Drawing.Bitmap
dim fin_img as System.Drawing.Bitmap
dim src_rect as Rectangle
dim fin_rect as Rectangle
dim gobj as Graphics
dim img_codec_array as ImageCodecInfo()
dim img_codec as ImageCodecInfo
dim encoder_params as System.Drawing.Imaging.EncoderParameters
dim image_height as Integer
dim image_width as Integer
dim adjust_ratio as Double
dim img_file_spec as String
' Yes - the server can write to this directory
img_file_spec = "D:\temp\thumbnail.jpg"
image_width = 200
image_height = 200
src_img = Nothing
fin_img = Nothing
try
' Get the file that was uploaded to us ...
posted_fileobj = request.Files( 0 )
' Create source image ...
src_img = new Bitmap( posted_fileobj.InputStream )
' Set source and final rectangle sizes ...
src_rect = New Rectangle( 0, 0, src_img.Width, src_img.Height )
fin_rect = New Rectangle( 0, 0, image_width, image_height )
' Create final image ...
fin_img = New Bitmap( image_width, image_height )
gobj = Graphics.FromImage( fin_img )
' Set graphics properties ...
gobj.InterpolationMode = InterpolationMode.HighQualityBicubic
gobj.SmoothingMode = SmoothingMode.HighQuality
gobj.PixelOffsetMode = PixelOffsetMode.HighQuality
gobj.CompositingQuality = CompositingQuality.HighQuality
' Copy source image to final ...
gobj.DrawImage( src_img, fin_rect, src_rect, System.Drawing.GraphicsUnit.Pixel )
' Set image quality to reduce image and file size ...
encoder_params = New System.Drawing.Imaging.EncoderParameters( 1 )
encoder_params.Param( 0 ) = New System.Drawing.Imaging.EncoderParameter( System.Drawing.Imaging.Encoder.Quality, 70L )
' Save optimized image to a JPEG file ...
fin_img.Save( img_file_spec, img_codec, encoder_params )
catch ex as Exception
err_msg = ex.ToString()
ok = false
finally
if ( not fin_img is Nothing ) then
fin_img.Dispose()
fin_img = Nothing
end if
' Must dispose, otherwise file remains locked ...
if ( not src_img is Nothing ) then
src_img.Dispose()
src_img = Nothing
end if
posted_fileobj = Nothing
end try
