Visualizzazione dei risultati da 1 a 2 su 2
  1. #1
    Utente di HTML.it
    Registrato dal
    Apr 2007
    Messaggi
    764

    Galleria che legge immagini da cartella zippata

    Ho una gallery che mostra le immagini contenute in una cartella.

    E' possibile, in qualche modo, far leggere le immagini da una cartella zippata? Grazie!

    Questo è il codice che sto usando.
    codice:
    <%
    
    Dim subfolder(50) 
    Dim files(200) 
    Dim picture(200)
    
    percorso = "images/gallery"
    wwwpercorso = percorso
    
    ifolder=1
    ifiles=1
    iImage=1
    
    
    estensione="jpg"
    
    numerothumb=4
    
    Set fs = CreateObject("Scripting.FileSystemObject")
    
    filepath = "./" & percorso
    
    dbfile = Server.MapPath(filepath)
    
    wwwpath = URL
    
    Set f = fs.GetFolder(dbfile)
    
    Set sf = f.SubFolders
    
    For Each f in sf 
    subfolder(ifolder) = subfolder(ifolder) & f.name
    ifolder=ifolder+1
    Next
    
    do while ifolder>1
    
    link=wwwpath & "?PATH=" &percorso&"/"&(subfolder(ifolder-1))&">" & subfolder(ifolder-1)
    
    Response.Write "<A HREF=" & link & "</A>
    "
    ifolder=ifolder-1
    loop
    
    Set fl = fs.GetFolder(dbfile)
    Set file = fl.Files
    For Each fl in file
    
    files(ifiles) = files(ifiles) & fl.name
    ifiles=ifiles+1
    Next
    
    
    totalefiles = ifiles
    
    for x =0 to totalefiles
    
    if Right (files(x),3) = estensione then
    picture(iImage)=files(x)
    iImage=iImage+1
    end if
    next
    
    record = iImage-1
    
    indice=0
    
    Response.Write("<table width=100% border=0>")
    
    do while record > indice
    Response.Write("<tr>")
    i=1
    
    do while ((i<numerothumb+1) and(record > indice))
    Response.Write("<td valign=bottom> ")
    Response.Write("<div align=center><a href=" & wwwpercorso & "/" & picture(indice+1) & " rel=lightbox[roadtrip]>")
    Response.write("[img] & wwwpercorso & [/img]</a></div>")
    Response.Write("<div align=center>" & picture(indice+1) & "</font>")
    Response.Write("
    
    
    </td>")
    indice = indice+1
    i=i+1
    loop
    Response.Write("</tr>")
    loop
    
    Response.Write("</table>")
    
    Set fl = Nothing
    Set sf = Nothing
    set f = Nothing
    Set fs = Nothing
    
    %>

  2. #2
    Utente di HTML.it
    Registrato dal
    Apr 2007
    Messaggi
    764
    Nessun'idea?

    Tempo fa ho visto una gallery in PHP dov'era possibile fare l'upload di un singolo file o di una cartella compressa. Mi chiedevo appunto se è possibile analogamente in questo caso, caricare una cartella zippata e farne leggere il contenuto.

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.