Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 14
  1. #1

    Problemi con upload Baol74

    Ciao a tutti
    ho questo codice che mi genera errore e non riesco a capire dov'è
    codice:
    <%
    Dim oUpload
    Set oUpload= new cUpload
    With oUpload
    'La riga seguente impoosta la connessione al database e la tabella di inserimento dati
    'La connesione e la tabella verranno aperti con il metodo oUpload.Database.Open()
    .SetDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("../dati/colbertaldo.mdb"),"SELECT Top 1 * FROM TBVEICOLI"
    .EnabledAspUpload	= False
    .EnabledImageSize	= False
    .EnabledLog 		 = False
    .AutoRename 		 = True
    .Overwrite			 = False
    .SetPath "..\images\foto\"
    .Load
    .UploadOnly "Images"
    If Not .EOF then
    .Database.Open()
    	While Not .EOF
    		.Save
    			response.Write "il file " & .GetFileName &" è stato salvato 
    "
    			.Database.Fields("TIPO") = .Form("Tipo")
    			.Database.Fields("MARCA") = .Form("Marca")
    			.Database.Fields("MODELLO") = .Form("Modello")
    			.Database.Fields("ANNI") = .Form("Anni")
    			.Database.Fields("DESCRIZIONE") = .Form("Descrizione")
    			.Database.Fields("FOTOP") = .GetFileName
    			.Database.AddNew()
    	.MoveNext
    	Wend
    .Database.Close
    else
     response.write("Nessuna immagine caricata")
    end if
    End With
    Set oUpload = Nothing
    %>
    Questo è l'errore:
    Errore di run-time di Microsoft VBScript errore "800a01a8'

    Necessario oggetto: 'Files'

    /Colbertaldo/riservato/upload.asp, riga 1042

    Ciao
    Altamira

  2. #2
    Utente di HTML.it L'avatar di Baol74
    Registrato dal
    Jul 2002
    Messaggi
    2,004
    Non hai scritto correttamente il tag form. Il problema è che non invii i dati in multipart, ma in post.

    Controlla di aver specificato l'entype

  3. #3
    Grazie 1000000000000000......
    Baol74


    Ciao
    Altamira

  4. #4
    Ho un altro problema:
    ho aggiunto un'altro campo file ma non mi funziona,
    questo è il codice:
    codice:
    <%
    Dim oUpload
    Set oUpload= new cUpload
    With oUpload
    'La riga seguente impoosta la connessione al database e la tabella di inserimento dati
    'La connesione e la tabella verranno aperti con il metodo oUpload.Database.Open()
    .SetDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("../dati/colbertaldo.mdb"),"SELECT Top 1 * FROM TBVEICOLI"
    .EnabledAspUpload	= False
    .EnabledImageSize	= False
    .EnabledLog 		 = False
    .AutoRename 		 = True
    .Overwrite			 = False
    .SetPath "..\images\foto\"
    .Load
    .UploadOnly "Images"
    If Not .EOF then
    .Database.Open()
    	While Not .EOF
    		.Save
    			response.Write "il file " & .GetFileName &" è stato salvato 
    "
    			Select Case lCase(.Files("InputName"))
    			.Database.Fields("TIPO") = .Form("Tipo")
    			.Database.Fields("MARCA") = .Form("Marca")
    			.Database.Fields("MODELLO") = .Form("Modello")
    			.Database.Fields("ANNI") = .Form("Anni")
    			.Database.Fields("DESCRIZIONE") = .Form("Descrizione")
    			Case "FotoP" : (.Database.Fields("FOTOP")) = .GetFileName
    			Case "FotoG" : (.Database.Fields("FOTOG")) = .GetFileName
    			.MoveNext
    	Wend
    	.Database.AddNew()
    .Database.Close
    else
     response.write("Nessuna immagine caricata")
    END SELECT
    end if
    End With
    Set oUpload = Nothing
    %>
    Questo è l'errore:
    Errore di compilazione di Microsoft VBScript errore "800a03ea'

    Errore di sintassi

    /Colbertaldo/riservato/insert.asp, riga 28

    Case "FotoP" : (.Database.Fields("FOTOP")) = .GetFileName

    non riesco a capire, è la prima volta che faccio un upload multiplo

    dimenticavo, questo è il form:
    codice:
    <form action="insert.asp" method="post" enctype="multipart/form-data" name="form1">
            <table width="500" align="center" cellspacing="5">
              <tr valign="baseline"> 
                <td width="100" align="right" nowrap><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Tipo</font></td>
                <td width="400"><select name="Tipo" id="Tipo">
                    <option value="LEGGERO" selected>LEGGERO</option>
                    <option value="MEDIO">MEDIO</option>
                    <option value="PESANTE">PESANTE</option>
                  </select> </td>
              </tr>
              <tr valign="baseline"> 
                <td nowrap align="right"><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Marca</font></td>
                <td><input name="Marca" type="text" id="Marca" size="45"> </td>
              </tr>
              <tr valign="baseline"> 
                <td nowrap align="right"><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Modello</font></td>
                <td><input name="Modello" type="text" id="Modello" size="45"> </td>
              </tr>
              <tr valign="baseline"> 
                <td nowrap align="right"><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Anni</font></td>
                <td><input name="Anni" type="text" id="Anni" size="45"> </td>
              </tr>
              <tr valign="baseline"> 
                <td align="right" valign="top" nowrap><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Descrizione</font></td>
                <td><textarea name="Descrizione" cols="50" rows="5" id="Descrizione"></textarea></td>
              </tr>
              <tr valign="baseline"> 
                <td nowrap align="right"><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Foto 
                  piccola </font></td>
                <td><input name="FotoP" type="file" id="FotoP"></td>
              </tr>
              <tr valign="baseline"> 
                <td nowrap align="right"><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Foto 
                  grande</font></td>
                <td><input name="FotoG" type="file" id="FotoG"> </td>
              </tr>
              <tr valign="baseline">
                <td nowrap align="right"></td>
                <td><input name="submit" type="submit" value="Inserisci">
                  <input type="reset" name="Submit" value="Reimposta"></td>
              </tr>
            </table>
            
          </form>
    Grazie
    Altamira

  5. #5
    ho fatto alcune modifiche, ora riesco a salvare i file,
    pero nel database vengono inseriti solo i campi testo,
    come devo modificare il codice?
    codice:
    <%
    Dim oUpload
    Set oUpload= new cUpload
    With oUpload
    'La riga seguente impoosta la connessione al database e la tabella di inserimento dati
    'La connesione e la tabella verranno aperti con il metodo oUpload.Database.Open()
    .SetDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("../dati/colbertaldo.mdb"),"SELECT Top 1 * FROM TBVEICOLI"
    .EnabledAspUpload	= False
    .EnabledImageSize	= False
    .EnabledLog 		 = False
    .AutoRename 		 = True
    .Overwrite			 = False
    .SetPath "..\images\foto\"
    .Load
    .UploadOnly "Images"
    If Not .EOF then
    .Database.Open()
    	While Not .EOF
    		.Save
    			response.Write "il file " & .GetFileName &" è stato salvato 
    "
    			.Database.Fields("TIPO") = .Form("Tipo")
    			.Database.Fields("MARCA") = .Form("Marca")
    			.Database.Fields("MODELLO") = .Form("Modello")
    			.Database.Fields("ANNI") = .Form("Anni")
    			.Database.Fields("DESCRIZIONE") = .Form("Descrizione")
    			Select Case lCase(.Files("InputName"))
    			Case "FotoP" :.Database.Fields("FOTOP") = .GetFileName
    			Case "FotoG" :.Database.Fields("FOTOG") = .GetFileName
    			END SELECT
    			.MoveNext
    	Wend
    	.Database.AddNew()
    	.Database.Close
    else
    response.write("Nessuna immagine caricata")
    end if
    End With
    Set oUpload = Nothing
    %>
    Grazie e ciao
    Altamira

  6. #6
    aiuto non riesco a risolvere il problema,
    le foto vengono salvate, ma non inserito il
    loro nome nel database insieme al resto dei dati
    che vengono inseriti.

    Altamira

  7. #7
    up

  8. #8
    Qualcuno mi aiuta non riesco a trovare il problema

    Ciao
    Altamira

  9. #9
    Utente di HTML.it L'avatar di Baol74
    Registrato dal
    Jul 2002
    Messaggi
    2,004
    Il problema qual'è? Non ho capito.

  10. #10
    Ciao

    il problema è che con l'ultimo script postato riesco a inserire nel database i campi di testo del mio form, a salvare i due file nella cartella prestabilita, ma i due nomi dei file non vengono inseriti nel database
    Ciao

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