#502 - Visualizzare le sottodirectory di una directory e la loro dimensione
Lo script (tramite il File System Object) permette di visualizzare le cartelle presenti sul web-server e per ognuna di queste lo spazio fisico da loro occupato.
Sostituendo "For Each objItem In cartella.SubFolders" con "For Each objItem In cartella.Files" verranno invece mostrati tutti i files presenti nella cartella!
<%
response.expireS=-100
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set Cartella = objFSO.GetFolder(Server.mappath(".\"))
response.write "Lista cartelle di <b>"&server.mappath(".\")&"</B>"
For Each objItem In cartella.SubFolders
' Se volete visualizzare i files mettete
' For Each objItem In cartella.files
response.write "<hr>"
response.write "Nome Cartella: "&objItem.Name&"<br>Dimensioni: "& objItem.Size & "Bytes"
Next
%>Approfondimenti
Commenti
Esprimi il tuo giudizio su questo script:
Per procedere devi essere autenticato.
Aggiungi un nuovo commento »»»
Per inserire un commento, devi registrarti alla nostra community.
Stampa 
Download 
