Es un componente Free para modificar imagenes, intento modificar el tamaño
de una imagen
con el siguiente código, pero no hay manera...
A ver que os parece.
Dim foto
Dim alt
Dim ample
Set foto=Server.CreateObject("GflAx193.GflAx")
altP
ampleP
foto.LoadBitmap("C:\Inetpub\wwwroot\ups\fotos\" & file.FileName)
foto.SaveFormat=1
foto.SaveJPEGQualityu
'foto.Resize(alt,ample)
foto.SaveBitmap("C:\Inetpub\wwwroot\ups\fotos\" & file.FileName)
Set foto=Nothing
Cuando quito el comentario a 'foto.Resize(alt,ample) "peta" y no funciona,
y lo malo
es que no da ningún error descriptivo.
Gracias.
Leer las respuestas