Visualizzazione dei risultati da 1 a 5 su 5
  1. #1
    Utente di HTML.it L'avatar di orcim
    Registrato dal
    May 2003
    Messaggi
    1,692

    Upload baol e recupero valore form

    Ciao.

    Utilizzo l'upload di Baol, ma non riesco a recuperare il valore di un campo di un form.

    Ho scritto così:

    codice:
    Set oUpload = new cUpload
    
    response.write oUpload.Form("Cartella")
    
        oUpload.SetPath oUpload.Form("Cartella")     
        oUpload.AutoRename = true
        oUpload.Overwrite = false
        oUpload.Upload
        oUpload.SaveAs GetFileName
    Ma oUpload.Form("Cartella") non stampa nulla, perchè????
    "Ubi Maior, Minor Cessat"
    Domandare è lecito, rispondere è cortesia...
    A tutti è dovuta una risposta, comunque...

    “Dio gradisce molto di più le bestemmie dell’uomo disperato che non le lodi del benpensante la domenica mattina durante il culto“ Martin Lutero

  2. #2
    Utente di HTML.it L'avatar di orcim
    Registrato dal
    May 2003
    Messaggi
    1,692
    Allora, ho modificato così:

    codice:
    Set oUpload = new cUpload
    
        oUpload.Load        
        oUpload.SetPath oUpload.Form("Nome_cartella") 
        oUpload.AutoRename = true
        oUpload.Overwrite = false
        oUpload.Upload
        oUpload.SaveAs GetFileName
            
        Set oUpload = Nothing
    Errore sulla classe upload.asp:

    ADODB.Stream error '800a0bb9'

    Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

    /upload.asp, line 590
    "Ubi Maior, Minor Cessat"
    Domandare è lecito, rispondere è cortesia...
    A tutti è dovuta una risposta, comunque...

    “Dio gradisce molto di più le bestemmie dell’uomo disperato che non le lodi del benpensante la domenica mattina durante il culto“ Martin Lutero

  3. #3
    Utente di HTML.it L'avatar di Baol74
    Registrato dal
    Jul 2002
    Messaggi
    2,004
    Prova così:
    codice:
    Function IsSet(Value)
     IsSet = Not IsNull(Vlue) And Value<>""
    End Function
    
    Sub Write(Value)
     Response.Write Value
    End Sub
    
    Set oUpload = new cUpload
    oUpload.Load      
    Path = oUpload.Form("Nome_cartella") 
    If IsSet(Path) Then
     oUpload.SetPath Path 
     oUpload.AutoRename = true
     oUpload.Overwrite = false
     oUpload.SaveAs oUpload.GetFileName
    Else
     Write "Percorso non valido"
    End if
    Set oUpload = Nothing
    Controlla di aver inserito l'attributo enctype nel tag form

    bye

  4. #4
    Utente di HTML.it L'avatar di orcim
    Registrato dal
    May 2003
    Messaggi
    1,692
    Grazie mille !!!! Adesso si che funziona !
    "Ubi Maior, Minor Cessat"
    Domandare è lecito, rispondere è cortesia...
    A tutti è dovuta una risposta, comunque...

    “Dio gradisce molto di più le bestemmie dell’uomo disperato che non le lodi del benpensante la domenica mattina durante il culto“ Martin Lutero

  5. #5

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 © 2025 vBulletin Solutions, Inc. All rights reserved.