Salve a tutti, dovrei caricare un'immagine sul server e ridimensionarla nello stesso momento, uso le classi di baol e wbresize di imente che separatamente (ovvero in una pagina mi carico l'immagine e con un link on the fly me la ridimensiono) mi funziona a dovere, ma vorrei fare tutto con un solo colpoho pensato di spedire la richiesta di wbresize con l'ogetto xmlhttp, ecco il codice.
In questo modo mi carica l'immagine ma non me la ridimensiona, dove sbaglio???codice:<% If Request("Upload")="1" then Dim oUpload Set oUpload = new cUpload oUpload.AutoRename = False oUpload.Overwrite = true oUpload.SetPath "/img" oUpload.Upload oUpload.SaveAs "Pippo.jpg" Set oUpload=Nothing // Redimensionamento immagine //' Istanzio l'oggetto XMLHTTP set richiesta = Server.CreateObject("Microsoft.XMLHTTP") // Apro l'oggetto ed invio la richiesta richiesta.Open "POST", "http://www.mioSito.it/wbresize.aspx?f=/img/Pippo.jpg&c=100&h=290&e=", false richiesta.Send() //' codice di risposta del server status = CInt(richiesta.status) //' Se lo stato è 200, è ok if status = 200 then Response.write ("Ok "&richiesta.responseText) else Response.write (" Errore: " & status &"</p>") end if set richiesta = Nothing end if
Grazie, ciao.

ho pensato di spedire la richiesta di wbresize con l'ogetto xmlhttp, ecco il codice.
Rispondi quotando