Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 19

Discussione: rinominare immagini

  1. #1

    rinominare immagini

    E' possibile rinominare automaticamente un'immagine con il numero dell'ID dopo essere stato fatto l'upload ed essere stato compilato un form??

    CIAO CIAO

  2. #2
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Devi prima recuperare l'ID inserito mediante la direttiva @@IDENTITY e poi fare una cosa di questo dipo con FSO:

    http://forum.html.it/forum/showthrea...inominare+file

    Roby

  3. #3
    non conosco molto bene la direttiva IDENTITY per recuperare l'id.

  4. #4
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Hai cercato nel forum?

    Roby

  5. #5

    ed ora?

    codice:
    <%
    Set Connect = Server.CreateObject("ADODB.Connection")
    Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.MapPath("/mdb-database/prova.mdb")
    
    Dim oUpload, prova
    Set oUpload= new cUpload
    
    With oUpload
    .EnabledAspUpload = False
    .EnabledImageSize = TRUE
    .EnabledLog = False
    .AutoRename = True
    .Overwrite = False
    .SetPath "\mdb-database\"
    .Load
    .UploadOnly "Images"
    While Not .Eof
    If .Files("Height")>=500 or .Files("Width")>=500 then
     Response.write ("Le dimensioni dell'immagine " &_
     .GetFileName() &" non sono corrette (" &_
     .Files("Height") &"x" & .Files("Width") &"): File non caricato
    "  )
    else
    prova = oUpload.Form("prova")
    prova = replace(prova, "'", "''")
    SQL = "INSERT INTO prova (prova)" 
    SQL = SQL&"VALUES ('"&prova&"')"
    Connect.Execute(SQL)
    dim ultimo_autoincremento
    ultimo_autoincremento = conn.execute ("SELECT TOP 1 @@identity FROM prova").fields(0).value
    response.Write(ultimo_autoincremento) 
    FSO.Movefile("mdb-database/nomefile-01.txt") 
    .Save
    end if
    .MoveNext
    Wend
    End With
    Set oUpload = Nothing
    %>
    FSO.Movefile("cartella/come_modifico??.jpg")

    Nel senso che stringa metto per dire allo script di rinominare l'immagine con in numero dell'ID??

  6. #6
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Prima effettui l'upload della foto, poi inserisci nel db tutti i campi che desideri (ad eccezione della foto, visto che non ti serve mettere nel db il suo percorso).
    Poi recuperi l'id appena inserito e rinomini la foto in base ad esso.

    Roby

  7. #7
    FSO.Movefile("mdb-database/<%=ultimo_autoincremento("ID")%>.jpg")

    cioè così??

  8. #8

  9. #9
    potresti essere un po' più preciso del più o meno :P

  10. #10
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Vediamo il tuo script.

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