redimensionar imagenes con aspupload, aspjpeg

[gracipr]

Hola a todos, tengo un programa para subir fotos echo en asp,utilizo aspupload y aspjpeg. lo k me interesaba es k al subir una foto se redimensionara, para k no fuera tan grande y asi al cargarla en la web no tardara tanto en mostrarse, xk al clientes k suben fotos muy grandes y luego tardan mucho en cargar, si alguien me pudiera pasar un ejemplo de codigo, creo k lo k se utiliza es resize, pero no estoy muy segura.

gracias de antemano

[comarine]

CREO_thumbnail name, 200, path, new_name


Function CREO_thumbnail(archivo,TMR,path,nuevo)
Set Jpeg = Server.CreateObject("Persits.Jpeg")
' Compute path to source image
Path_thumbnail = path & "\" & archivo
' Open source image
Jpeg.Open Path_thumbnail

W = Jpeg.OriginalWidth
H = Jpeg.OriginalHeight

if TMR < W then
if W >= H then
MAYOR = W
else
MAYOR = H
end if
PORC_REDUC = (TMR * 100 / MAYOR)
' Decrease image size
Jpeg.Width = ( PORC_REDUC * Jpeg.OriginalWidth / 100 )
Jpeg.Height = ( PORC_REDUC * Jpeg.OriginalHeight / 100 )
'AspJpeg supports three popular image resizing algorithms: Nearest-Neighbor, Bilinear and Bicubic.
Jpeg.Interpolation=1
end if
' create thumbnail and save it to disk
GuardarComo = path & "\" & nuevo
Jpeg.Save GuardarComo
End Function


Saludos y suerte

[gracipr]

gracias por responder, pero creo k la funcion k me pasas es pa crear miniaturas, y yo lo k kiero es como si reducieras una imagen en el photoshop, si ocupa un mega, k al subir se redimensione a menos, igual no lo entendi yo bien, pero lo k pretendo es k no suba imagenes tan grandes y como el cliente no sabe reducirle el peso pues k lo aga el asp, pero k el tamaño de la foto sea el mismo.

[comarine]

Hola Graciela

Lo que querés no se puede, si querés reducir el peso de la imagen tenés que reducir el tamaño.

La función que te pasé reduce una imagen, a la cual previamente le hiciste el upload, en el ejemplo a 200 como máximo de ancho. Pero si cambiás el new_name te genera una nueva a imagen de la original pero reducida. Yo la uso así, muestro la reducida y si el usuario hace clic en la imagen muestro la original.

Espero que te sirva, si no fui claro por favor avisame.

Saludos

Carlos