enterprise
Perch
Hi,
I hope that some of you can help me in this..., I have east code:
And nevertheless images is terrible, and no longer encounter the solution to this, I am failing in something? ?(
Thanks guys
I hope that some of you can help me in this..., I have east code:
Code:
Set Jpeg = Server.CreateObject("Persits.Jpeg")
Jpeg.Open( Server.MapPath(ThumbImagen) )
Jpeg.Quality = 100
If ancho = 0 Then
Jpeg.Width = Jpeg.OriginalWidth
Jpeg.Height = Jpeg.OriginalHeight
Else
Jpeg.Width = Jpeg.OriginalWidth * ancho / Jpeg.OriginalHeight
Jpeg.Height = ancho
End If
ThumbImagen = Jpeg.SendBinary
Set Jpeg = Nothing
And nevertheless images is terrible, and no longer encounter the solution to this, I am failing in something? ?(
Thanks guys