Visualizzazione dei risultati da 1 a 3 su 3

Discussione: upload baol + wbresize

  1. #1

    upload baol + wbresize

    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 colpo ho pensato di spedire la richiesta di wbresize con l'ogetto xmlhttp, ecco il codice.

    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
    In questo modo mi carica l'immagine ma non me la ridimensiona, dove sbaglio???

    Grazie, ciao.

  2. #2

  3. #3
    Grazie per la risposta!

    I permessi di scrittura nella cartella di destinazione (img) ci sono, anche perchè se uso le due classi separate lo script funziona.

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2026 vBulletin Solutions, Inc. All rights reserved.