Pagina 1 di 3 1 2 3 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 21
  1. #1
    Utente di HTML.it
    Registrato dal
    Jan 2007
    Messaggi
    70

    Inserimento variabile in Action FORM verso file ASP, come la setto?

    Ciao ho un problema grosso, che devo assolutamente risolvere..è tutto il pomeriggio che ci sbatto la testa sopra senza trovare soluzione..

    I° FILE:
    codice:
    <body topmargin="0" leftmargin="0">
    
    
    <% Set Rs = Conn.Execute("SELECT * FROM architettura WHERE nome_immagine = '"&Request("nome_immagine")&"'") %>
    
    
    <FORM METHOD="post" ENCTYPE="multipart/form-data" ACTION="architetturaUploadThumbnail.asp?id_file=<%=Rs("id_file")%>&nome_thumbnail=ZUZU">
    <table width="450" border="0" cellspacing="4" cellpadding="4" align="center" class="tabe">
      <tr>
        <td colspan="2" align="center" height="25">INSERISCI MINIATURA</td>
      </tr>
      <tr>
        <td width="99">File:</td>
        <td width="321"><%=Rs("nome_immagine")%></td>
      </tr>
      <tr>
        <td>Miniatura Attuale:</td>
      <td>
            <%=Rs("nome_thumbnail")%>  
      </td>
      </tr>
      <tr>
        <td colspan="2" align="center">
      <span class="verde">Carica file:</span>
      <input name="nome_thumbnail" type="file" size="35" >
      <input type="submit" name="aggiorna" value="Aggiorna descrizione" />
            <input type="hidden" name="aa" value="aa" />
        <input type="hidden" name="id" value="<%=Rs("id_file")%>" /></td>
      </tr>
    </table>
    </form>
    <% Rs.Close
    Set Rs = Nothing
    Conn.Close
    Set Conn = Nothing %>
    </body>
    II° FILE:
    codice:
    <% cartella = Request("cartella") %>
    
     
    <%
    	Response.Write("First Name: " & Request.QueryString("id_file") & "
    ")
    	Response.Write("Last Name: " & Request.QueryString("nome_thumbnail") & "
    ")
    	Conn.Execute("UPDATE architettura SET nome_thumbnail = '"&replace(request("nome_thumbnail"),"'","''")&"' WHERE id_file = "&Request("id_file")&"")
    	
    
    	Conn.Close
    	Set Conn = Nothing
    %>
    <%
    Dim oUpload
    Set oUpload = new cUpload
    	oUpload.SetPath "/public/architettura/thumbnail/"
    	oUpload.UploadAndSave
    Set oUpload=Nothing
    
    	Response.Write("<div align=""center"">
    
    Descrizione modificata con successo!
    
    
    
    
    
    ")
    	Response.Write("<input type=""button"" onClick=""window.close();"" value=""Chiudi finestra""></div>")
    	response.End()
    %>
    Nel primo file nella ACTION della FORM come vedete gli passo al secondo file i seguenti dati:
    id_file e nome_thumbnail

    "nome_thumbnail" se lo setto manualmente (es. ZUZU) il valore viene correttamente passato al secondo file, ma come faccio a far si che questo acquisti il valore inserito nell'INPUT file più in basso?In modo tale che cambi in funzione al file selezionato nell'input?

    Qual'è il codice giusto da associare alla variabile "nome_thumbnail"?
    Cosa devo inserire qui dentro?
    codice:
    <FORM METHOD="post" ENCTYPE="multipart/form-data" ACTION="architetturaUploadThumbnail.asp?id_file=<%=Rs("id_file")%>&nome_thumbnail=ZUZU">
    al posto di ZUZU ?

    Help please!

  2. #2
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Si fa in js recuperando il value del campo.
    Ad ogni modo non capisco a cosa ti serva visto che con l'upload lo puoi recuperare lo stesso.

    Roby

  3. #3
    Utente di HTML.it
    Registrato dal
    Jan 2007
    Messaggi
    70
    Ciao grazie per l'attenzione innanzi tutto, comunque come faccio in JS a recuperare quella variabiele?mi sai dire il codice della funzione?

    Poi sai che tu hai ragione, il problema è che nel file "architetturaUploadThumbnail.asp" con il metodo POST (quello attuale che mi fa andare a buon fine l'upload vero e proprio dell'immagine nel server) non so come richiamarla, infatti:

    codice:
    Response.Write("First Name: " & Request.QueryString("id_file") & "
    ")
    	Response.Write("Last Name: " & Request.QueryString("nome_thumbnail") & "
    ")
    mi servono proprio per controllare cosa riesco ad passare al II° file, e id_file viene sempre tirato su alla perfezzione, mentre nome_thumbnail rimane sempre in bianco..

    Se eseguo la FORM con il metodo GET, riesco tranquillamente a vedere tutto quello che voglio nel secondo file, ma stranamete l'immagine in upload non viene caricata sul server, quindi probabilmente il file carica.asp non funziona con il metodo GET.

    Mi potresti delucidare con le tue due vers?Sia quella in JS che l'altra?Come fai a fargli tirar su la variabile nome_thumbnail nel II° file con il metodo POST nella FORM?

    Grazie infinite..sono davvero alla frutta..2 pomeriggi buttati al vento..se riesci a darmi una mano giuro che ti faccio una scultura!

  4. #4
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    codice:
    nome_thumbnail = oUpload.Form("nome_thumbnail")
    id_file = oUpload.Form("id_file")
    id_file lo devi passare come campo hidden

    Roby

  5. #5
    Utente di HTML.it
    Registrato dal
    Jan 2007
    Messaggi
    70
    Allora ho fatto così:

    I° File architetturaThumbnail.asp

    codice:
    <% If Session("ok") <> "ok" Then
    	Response.Redirect("index.asp")
    End If %>
    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
    <html xmlns="http://www.w3.org/1999/xhtml">
    <head>
    <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
    <title>Modifica</title>
    <style type="text/css">
    <!--
    .tabe {border:1px solid #000000}
    -->
    </style>
    </head>
    
    <body topmargin="0" leftmargin="0">
    
    <% 
    If Request("aa") = "aa" Then
    	Conn.Execute("UPDATE architettura SET nome_thumbnail = '"&replace(request("nome_thumbnail"),"'","''")&"' WHERE id_file = "&Request("id")&"")
    	Conn.Close
    	Set Conn = Nothing
    	Response.Write("<div align=""center"">
    
    Descrizione modificata con successo!
    
    
    
    
    
    ")
    	Response.Write("<input type=""button"" onClick=""window.close();"" value=""Chiudi finestra""></div>")
    	response.End()
    End If
    Set Rs = Conn.Execute("SELECT * FROM architettura WHERE nome_immagine = '"&Request("nome_immagine")&"'") %>
    
    
    <FORM METHOD="post" ENCTYPE="multipart/form-data" ACTION="architetturaUploadThumbnail.asp">
    <table width="450" border="0" cellspacing="4" cellpadding="4" align="center" class="tabe">
      <tr>
        <td colspan="2" align="center" height="25">INSERISCI MINIATURA</td>
      </tr>
      <tr>
        <td width="99">File:</td>
        <td width="321"><%=Rs("nome_immagine")%></td>
      </tr>
      <tr>
        <td>Miniatura Attuale:</td>
        <!--<td>
    		<textarea name="descrizione_immagine" cols="40" rows="5">
    			<%=Rs("nome_thumbnail")%>
    		</textarea>
    	</td>-->
    	<td>
    				<%=Rs("nome_thumbnail")%>  
    	</td>
      </tr>
      <tr>
        <td colspan="2" align="center">
    	<span class="verde">Carica file:</span>
    	<input name="nome_thumbnail" id="nome_thumbnail" type="file" size="35" >
    	<input type="submit" name="aggiorna" value="Aggiorna descrizione" />
            <input type="hidden" name="aa" value="aa" />
    		<input type="hidden" name="id_file" value="<%=Rs("id_file")%>" /></td>
      </tr>
    </table>
    </form>
    <% Rs.Close
    Set Rs = Nothing
    Conn.Close
    Set Conn = Nothing %>
    </body>
    </html>
    II° File architetturaUploadThumbnail.asp

    codice:
    <% If Session("ok") <> "ok" Then
    	Response.Redirect("index.asp")
    End If %>
    
     
    <%
    	Dim oUpload
    	Set oUpload = new cUpload
    		oUpload.SetPath "/public/architettura/thumbnail/"
    		oUpload.UploadAndSave
    	Set oUpload=Nothing
    
    
    	nome_thumbnail = oUpload.Form("nome_thumbnail")
    	id_file = oUpload.Form("id_file")
    	Response.Write("First Name: " & Request.QueryString("id_file") & "
    ")
    	Response.Write("Last Name: " & Request.QueryString("nome_thumbnail") & "
    ")
    	Conn.Execute("UPDATE architettura SET nome_thumbnail = '"&replace(request("nome_thumbnail"),"'","''")&"' WHERE id_file = "&Request("id_file")&"")
    	
    
    	Conn.Close
    	Set Conn = Nothing
    
    
    	Response.Write("<div align=""center"">
    
    Descrizione modificata con successo!
    
    
    
    
    
    ")
    	Response.Write("<input type=""button"" onClick=""window.close();"" value=""Chiudi finestra""></div>")
    	response.End()
    
    %>
    Ma mi da questo errore:

    Microsoft VBScript runtime error '800a01a8'

    Object required

    /gestione/architetturaUploadThumbnail.asp, line 14
    Come mi hai detto tu ho tolto il campo id_file nella action della form e ho inserito quello che mi hai detto tu nel secondo file..ma mi da l'errore sopra citato..
    Che devo fare?

    Grazie ancora!

    PS: Comunque l'immagine viene correttamente caricata sul server..

  6. #6
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Set oUpload=Nothing

    Lo devi mettere prima della chiusura della connessione e comunque DOPO aver usato per l'ultima volta l'oggetto della classe.

    Roby

  7. #7
    Utente di HTML.it
    Registrato dal
    Jan 2007
    Messaggi
    70
    Ok l'ho messo qui:

    codice:
    <% If Session("ok") <> "ok" Then
    	Response.Redirect("index.asp")
    End If %>
    
     
    <%
    	Dim oUpload
    	Set oUpload = new cUpload
    		
    		nome_thumbnail = oUpload.Form("nome_thumbnail")
    		id_file = oUpload.Form("id_file")
    		oUpload.SetPath "/public/architettura/thumbnail/"
    		oUpload.UploadAndSave
    
    	Set oUpload=Nothing
    
    	Response.Write("First Name: " & Request.QueryString("id_file") & "
    ")
    	Response.Write("Last Name: " & Request.QueryString("nome_thumbnail") & "
    ")
    	Conn.Execute("UPDATE architettura SET nome_thumbnail = '"&replace(request("nome_thumbnail"),"'","''")&"' WHERE id_file = "&Request("id_file")&"")
    	
    
    	Conn.Close
    	Set Conn = Nothing	
    
    
    	Response.Write("<div align=""center"">
    
    Descrizione modificata con successo!
    
    
    
    
    
    ")
    	Response.Write("<input type=""button"" onClick=""window.close();"" value=""Chiudi finestra""></div>")
    	response.End()
    
    %>
    ma mi viene generato questo errore adesso:

    Request object error 'ASP 0208 : 80004005'

    Cannot use generic Request collection

    /gestione/architetturaUploadThumbnail.asp, line 19

    Cannot use the generic Request collection after calling BinaryRead.
    Grazie per la pazienza.. :master:

  8. #8
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    I 2 response.write prima della chiusura dell'oggetto che hai appena messo li devi togliere...

    Roby

  9. #9
    Utente di HTML.it
    Registrato dal
    Jan 2007
    Messaggi
    70
    Ok ecco il nuovo file:

    codice:
    <% If Session("ok") <> "ok" Then
    	Response.Redirect("index.asp")
    End If %>
    
     
    <%
    	Dim oUpload
    	Set oUpload = new cUpload
    		
    		nome_thumbnail = oUpload.Form("nome_thumbnail")
    		id_file = oUpload.Form("id_file")
    		oUpload.SetPath "/public/architettura/thumbnail/"
    		oUpload.UploadAndSave
    
    	Set oUpload=Nothing
    
    	Conn.Execute("UPDATE architettura SET nome_thumbnail = '"&replace(request("nome_thumbnail"),"'","''")&"' WHERE id_file = "&Request("id_file")&"")     <-- RIGA 17 dell'errore 
    	
    
    	Conn.Close
    	Set Conn = Nothing	
    
    
    	Response.Write("<div align=""center"">
    
    Descrizione modificata con successo!
    
    
    
    
    
    ")
    	Response.Write("<input type=""button"" onClick=""window.close();"" value=""Chiudi finestra""></div>")
    	response.End()
    
    %>
    e il nuovo errore..

    ADODB.Stream error '80004005'

    Operation is not allowed when the object is closed.

    /gestione/architetturaUploadThumbnail.asp, line 17

  10. #10
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Insisti eh...
    Nella query devi usare le varibili che hai già recuperato non la Request...

    Roby

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.