Elencare file con una determinata estensione - Script ASP


Come leggere il contenuto di una cartella è già stato trattato in altre occasioni. In questa situazione introduciamo una variante per individuare solo i file con una determinata estensione da noi definita.

<% 

' Dichiara le variabili necessarie 
Dim objFso, objFolder, objFiles
Dim strFolder, strFile, strPath, strExt
' Definisci il percorso della cartella da leggere 
strPath = "cartella/" 
strExt = ".asp" 

' Crea gli oggetti FSO necessari 
Set objFso = Server.createObject("Scripting.FileSystemObject") 
Set objFolder = objFso.GetFolder(Server.MapPath(strPath)) 
Set objFiles = objFolder.Files 

' Scorri tutti i file nella cartella 
for each strFile in objFiles 
    ' Controlla l'estensione 
    if Right(strFile.name, Len(strExt)) = strExt then 
        Response.Write(strFile.name) & "<br />"
    end if
next
' Distruggi oggetti e libera risorse 
Set objFso = Nothing 
Set objFolder = Nothing
Set objFiles = Nothing 

%> 

Le variabili strPath e strExt contengono rispettivamente il percorso della cartella da leggere ed il tipo di estensione da considerare.
Successivamente vengono istanziati gli oggetti File System Object necessari e viene eseguito un ciclo su ciascun file contenuto nella cartella.

Nella parte centrale viene controllata l'estensione del file, confrontando la parte finale e se corrispondente viene stampato il nome del file. Il confronto in questo caso non è case sensitive, ovvero non fa distinzione tra estensioni maiuscole e minuscole.


ASP.weppos.com e ASP.weppos.it sono di proprietà di Simone Carletti.
Scopri il mio sito o visita il mio Simone Carletti's profile on LinkedIn