Getting A generic error occurred in GDI+ message

S

Showjumper

I have set a file based photo galery. Thumbnails are generated and saved to
disk. Everything was working or so i thought until i found this problem.
When you click a link to go to a gallery everything works fine. But if you
reload that page then you get the dreaded generic error message. To it
happen go to http://riderdesign.com/photos/default.aspx?Album=EquineRotation
and then reload the page.
My code making the thumbs is this: Any idea whats happening and how to fix
this.?

Thanks
Ashok Padmanabhan

For Each oFile In oFiles

Dim ext As String = oFile.Extension.ToLower

If ext = ".jpg" Or ext = ".gif" And ThumbFile.GetLength(0) <>
oFiles.GetLength(0) Then

Dim FileName As String = oFile.Name.ToLower()

Dim g As System.Drawing.Image

Dim boxWidth As Int32 = 100

Dim boxHeight As Int32 = 100

Dim newHeight, sizer, newWidth As Double

g = System.Drawing.Image.FromFile(PhysPath & "\" & FileName)

If g.Height > g.Width Then

sizer = CDbl(boxWidth / g.Height)

Else

sizer = CDbl(boxHeight / g.Width)

End If

newWidth = Convert.ToInt32(g.Width * sizer)

newHeight = Convert.ToInt32(g.Height * sizer)

Dim g2 As New System.Drawing.Bitmap(g, CInt(newWidth), CInt(newHeight))

g.Dispose()

Dim Epars As New EncoderParameters(1)

Dim Ic As ImageCodecInfo

g2.RawFormat.Equals("jpg")

Ic = GetEncoderInfo("image/jpeg")

Epars.Param(0) = New EncoderParameter(Encoder.Quality, 90)

g2.Save(destdir & "/" & Path.GetFileName(FileName), Ic, Epars)

g2.Dispose()

g = Nothing

g2 = Nothing

Else

'do nothing

End If

Next oFile
 
H

Herfried K. Wagner [MVP]

Showjumper said:
g2.Save(destdir & "/" & Path.GetFileName(FileName), Ic, Epars)

Use "\" as directory sepator or better use 'System.IO.Path.Combine'.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top