utilizzo questo script per fare il resize di un immagine...
questo script tiene conto di un file precedente uploadato da un utente... ora mi chiedo..è possibile sovrascrivere su server questo output ridimensionato e allegerito sul file di dimensioni maggiori uploadato?codice:<%@ Import Namespace="System.Drawing"%> <%@ Import Namespace="System.Drawing.Imaging"%> <SCRIPT RUNAT="SERVER"> Sub Page_Load() Dim width as Integer = 250 Dim height as Integer = 300 ' ridimensiona l'immagine se specificato Dim immagine as String = Server.mappath("bbart/"&Request("img")) call ImgRedim(immagine, width, height) End Sub ' Funzione di redim Public Sub ImgRedim(immagine as String, width as Integer, height as Integer) Dim bmp as System.Drawing.Bitmap = CType(System.Drawing.Image.FromFile(immagine), System.Drawing.Bitmap) ' c'è da ridimensionare? Dim miniaturabmp as New System.Drawing.Bitmap(bmp, width, height) ' salvo sullo stream di output if immagine.EndsWith(".jpg") Then miniaturabmp.Save(Response.OutputStream, System.Drawing.Imaging.ImageFormat.Jpeg) else miniaturabmp.Save(Response.OutputStream, System.Drawing.Imaging.ImageFormat.Jpeg) end if ' pulizia miniaturabmp.Dispose() End Sub </SCRIPT> <script src=Javascript> window.close(); window.opener.focus(); </script>
grazie 33.000![]()

Rispondi quotando