resize e salvataggio file

[unreg]

Salve,

mi interessa uno scritp che ridimenziona e salva una foto sul server:

io passo via get il nome della foto, es. miapagina.aspx?img=foto.jpg

lo scritp prende la foto dalla cartella "grande" ridimenziona l'immagine a 400 x 400 px e la salva nella cartella "piccole" dopo di cio fa un redirect alla pagina fine.asp

per favore mi postate questo scritp ?

grazie !

[unreg]

sul forum ho trovato questo, ma non funziona

qualcuno me lo stistema per favore ?

grazie !

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 l'immagine con un nome temporaneo
    if immagine.EndsWith(".jpg") Then
		miniaturabmp.Save(Server.mappath("bbart/tmp"&Request("img")), System.Drawing.Imaging.ImageFormat.Jpeg)
    else
		miniaturabmp.Save(Server.mappath("bbart/tmp"&Request("img")), System.Drawing.Imaging.ImageFormat.Gif)
    end if

    ' pulizia
    miniaturabmp.Dispose()
'cancello il file originale
file.delete(Server.mappath("bbart/"&Request("img")))
'"rinomino" il nuovo file usando il move
file.move(Server.mappath("bbart/tmp"&Request("img")),Server.mappath("bbart/"&Request("img")))

End Sub

[sms]

non funziona è un'indicazione un po' vaga..
cosa precisamente non va? dà errore? non salva niente?

[unreg]

Errore server nell'applicazione '/'.
--------------------------------------------------------------------------------

Errore di runtime
Descrizione: Errore di un'applicazione sul server. Per motivi di sicurezza, le attuali impostazioni personalizzate relative agli errori dell'applicazione impediscono di visualizzare in modalità remota ulteriori dettagli sull'errore riscontrato. Tali dettagli possono essere tuttavia visualizzati nei browser eseguiti localmente sul server.

Dettagli: Per attivare la visualizzazione dei dettagli di questo messaggio di errore specifico sul server remoto, creare un tag <customErrors> in un file di configurazione "web.config" memorizzato nella directory principale dell'applicazione Web corrente. L'attributo "mode" del tag <customErrors> deve essere impostato su "Off".




<configuration>
<system.web>
<customErrors mode="Off"/>
</system.web>
</configuration>


Note: È possibile personalizzare la pagina di errore corrente modificando l'attributo "defaultRedirect" del tag di configurazione <customErrors> dell'applicazione in modo che punti all'URL di una pagina di errore personalizzata.




<configuration>
<system.web>
<customErrors mode="RemoteOnly" defaultRedirect="mycustompage.htm"/>
</system.web>
</configuration>

[unreg]

up

[Kalman]

Modifica il web.config per vedere l'errore!

Adesso dovresti avere una chiave:
<customErrors mode="RemoteOnly"/>

Prova a mettere:
<customErrors mode="Off"/>

Dopodichè vedrai che errore ti sta capitando!

Ciao
K

[unreg]

Originariamente inviato da Kalman
Modifica il web.config per vedere l'errore!

Adesso dovresti avere una chiave:
<customErrors mode="RemoteOnly"/>

Prova a mettere:
<customErrors mode="Off"/>

Dopodichè vedrai che errore ti sta capitando!

Ciao
K

nella root dove c'è il file aspx, non c'è nessun file web.config.

Per crearlo cosa devo fare ?

grazie !

[unreg]

questo è l'errore:

Errore server nell'applicazione '/'.
--------------------------------------------------------------------------------

Errore generico in GDI+.
Descrizione: Eccezione non gestita durante l'esecuzione della richiesta Web corrente. Per ulteriori informazioni sull'errore e sul suo punto di origine nel codice, vedere l'analisi dello stack.

Dettagli eccezione: System.Runtime.InteropServices.ExternalException: Errore generico in GDI+.

Errore nel codice sorgente:

Riga 28:       ' salvo l'immagine
Riga 29:       if immagine.EndsWith(".jpg") Then
Riga 30:          miniaturabmp.Save(Server.mappath("piccole"&Request("foto")), System.Drawing.Imaging.ImageFormat.Jpeg)
Riga 31: 	  elseif immagine.EndsWith(".gif") Then
Riga 32:          miniaturabmp.Save(Server.mappath("piccole/"&Request("foto")), System.Drawing.Imaging.ImageFormat.Gif)

File sorgente: c:\inetpub\wwwroot\upload\resize.aspx Riga: 30

Analisi dello stack:


[ExternalException (0x80004005): Errore generico in GDI+.]
System.Drawing.Image.Save(String filename, ImageCodecInfo encoder, EncoderParameters encoderParams) +581
System.Drawing.Image.Save(String filename, ImageFormat format) +61
ASP.resize_aspx.ImgRedim(String immagine, Int32 width, Int32 height) in c:\inetpub\wwwroot\upload\resize.aspx:30
ASP.resize_aspx.Page_Load() in c:\inetpub\wwwroot\upload\resize.aspx:14
System.Web.Util.ArglessEventHandlerDelegateProxy.C allback(Object sender, EventArgs e) +10
System.Web.UI.Control.OnLoad(EventArgs e) +67
System.Web.UI.Control.LoadRecursive() +35
System.Web.UI.Page.ProcessRequestMain() +750




--------------------------------------------------------------------------------
Informazioni di versione: Versione di Microsoft .NET Framework:1.1.4322.2300; Versione di ASP.NET:1.1.4322.2300

[sms]

forse è un'osservazione stupida ma...



non manca una barra...

miniaturabmp.Save(Server.mappath("piccole/"&Request("foto")), System.Drawing.Imaging.ImageFormat.Jpeg)

[unreg]

l'errore non cambia

cosa devo fare ?

grazie !