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

    Uplodare 2 immagini su un solo record..

    Salve a tutti..
    Utilizzo questo script x fare l'upload di immagini e campi di testo e funziona alla perfezione.. Sino a quando non mi è venuta l'idea di fare l'upload di 2 immagini (1 piccola e 1 grande..)
    IL PROBLEMA:
    Cosi come è mi fa l'upload delle immagini ma non le inserisce sullo stesso record da in 2 diversi e doppi cosi:

    img img
    foto1 foto1
    foto2 foto2

    a me servirebbe cosi:

    img1 img2
    foto1 foto2
    ..
    Questo script esegue un ciclo e ho provato spostando
    .Database.Fields("immagine2") = .GetFileName() dopo il ciclo ma non ottengo il risultato desiderato ma sempre 2 record uguali ma uno con una immagine in meno..

    Vi posto il codice che utillizo:


    <%
    Dim oUpload
    Set oUpload= new cUpload
    With oUpload
    .SetDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("../mdb-database/dati.mdb"),"SELECT Top 1 * FROM manifestazioni"
    .EnabledAspUpload = False
    .EnabledImageSize = true
    .EnabledLog = False
    .AutoRename = True
    .Overwrite = False
    .SetPath "foto"
    .Load
    .MoveFirst
    if .EOF then
    NumFiles = .Count()
    Response.write "0 Files caricati su " & NumFiles &" : controlla le dimensioni e il tipo di file."
    %>
    <center>


    <input type="button" value="Indietro" onClick="history.back()" name="button22" style="color: #000000; font-size: 8 pt">
    </center>
    <%
    else
    .Database.Open()
    While Not .EOF
    if .Files("InputName")="campo2" then
    .Files("DestPath") = Server.MapPath("foto")
    .Save
    else
    .Files("Name")=session("session.sessionID")

    .Save
    'Inserimento dei valori
    .Database.Fields("evento") = .Form("evento")
    .Database.Fields("numero") = .Form("numero")
    .Database.Fields("giorno") = .Form("giorno")
    .Database.Fields("mese") = .Form("mese")
    .Database.Fields("anno") = .Form("anno")
    .Database.Fields("titolo") = .Form("titolo")
    .Database.Fields("sottotitolo") = .Form("sottotitolo")
    .Database.Fields("testo") = .Form("testo")
    .Database.Fields("luogo") = .Form("luogo")
    .Database.Fields("orainizio") = .Form("orainizio")
    .Database.Fields("acuradi") = .Form("acuradi")
    .Database.Fields("immagine1") = .GetFileName()
    .Database.Fields("immagine2") = .GetFileName()
    .Database.AddNew()
    '(qua è dove ho prov a mettere immagine2 ma non va)
    end if
    %>
    <center>
    <font face="Verdana, Arial, Helvetica, sans-serif" size="2">
    <%
    response.Write "La manifestazione " & .Form("evento") &" del " & .Form("numero") &" " & .Form("mese") &" è stata inserita..
    "
    %>


    <input type="button" value="Continua" onClick="location.href='../pannellodicontrollo.asp?azione=inseriscimanifestaz ione'" name="button223" style="color: #000000; font-size: 8 pt">
    </font>
    </center>
    <%
    .MoveNext
    Wend
    end if
    End With
    Set oUpload = Nothing
    %>

    qualcuno ha una idea??
    Saluti..
    Luca

  2. #2
    Ciao a tutti..
    nessuno ha un consiglio??

  3. #3

  4. #4
    l'inserimento nel database lo devi fare dopo l'upload usando delle variabili di "memoria" in cui ti salvi il nome della foto che hai uplodato

  5. #5

    Grazie della risposta prima di tutto.. mi sapresti dire meglio cosa intendi per variabili di memoria? Sai metterle dentro uno script di upload non mi vien tanto facile..

  6. #6
    se tu hai un do while...loop ad ogni giro memorizzi in una variabile diversa il nome di ogni immagine e dopo a fine loop salvi il tutto nel database


  7. #7
    lo script è quello di sopra.. non c'è un do while.. c'è una If..
    ..

  8. #8
    codice:
    
    While Not .EOF
    è uguale...io intendevo che c'era un ciclo

  9. #9
    Ciao Santino e grazie delle risposte..
    Ti dico già che non ci riesco però son uno che sino a quando non risolve una cosa non va a letto (eccetto x sfinimento!!)..
    allora.. mi devo creare 2 variabili tipo:
    images1 = immagine1
    images2 = immagine2
    ma non capisco come fare il posizionamento e/o se devo eliminare queste righe da qua e posizionarle da qualche altra parte per essere inserite dopo..

    .Database.Open()
    While Not .EOF
    if .Files("InputName")="campo2" then
    .Files("DestPath") = Server.MapPath("foto")
    .Save
    else
    .Files("Name")=session("session.sessionID")

    .Save
    'Inserimento dei valori
    .Database.Fields("evento") = .Form("evento")
    .Database.Fields("numero") = .Form("numero")
    .Database.Fields("giorno") = .Form("giorno")
    .Database.Fields("mese") = .Form("mese")
    .Database.Fields("anno") = .Form("anno")
    .Database.Fields("titolo") = .Form("titolo")
    .Database.Fields("sottotitolo") = .Form("sottotitolo")
    .Database.Fields("testo") = .Form("testo")
    .Database.Fields("luogo") = .Form("luogo")
    .Database.Fields("orainizio") = .Form("orainizio")
    .Database.Fields("acuradi") = .Form("acuradi")
    .Database.Fields("immagine1") = .GetFileName()
    .Database.Fields("immagine2") = .GetFileName()

    .Database.AddNew()
    ...

    (Baol_74 se ci sei batti un colpo!!)

  10. #10
    codice:
    immagine1=""
    immagine2=""
    
    .Database.Open()
    While Not .EOF
    if .Files("InputName")="campo2" then
    
    if immagine1<>"" then
    immagine2=.getFileName()
    else
    immagine1=.getFileName()
    end if
    
    .Files("DestPath") = Server.MapPath("foto")
    .Save
    else
    .Files("Name")=session("session.sessionID")

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.