View Single Post
Old 11-01-2022, 07:09   #8
x_Master_x
Senior Member
 
L'Avatar di x_Master_x
 
Iscritto dal: May 2005
Messaggi: 8697
Cerca di passare a qualcosa di più avanzato, come VBS o PowerShell.
La sintassi è semplice, ma ti apre un nuovo mondo di possibilità (per quanto sia fattibile con i batch, ma come vedi meno codice, più leggibile)

VBS
Codice:
Dim objFSO, myFolders, Folder, objFolder, sizeFolder
Set objFSO = CreateObject("Scripting.FileSystemObject")
myFolders = Array("C:\Cartella_1","C:\Cartella_2", "C:\Cartella_3")
For Each Folder In myFolders
    If objFSO.FolderExists(Folder) Then
        Set objFolder = objFSO.GetFolder(Folder)
        sizeFolder = Round(objFolder.Size / 1024 / 1024, 2)
        WScript.Echo(Folder & Chr(13) & Chr(10) & (sizeFolder) & " MB")
        If sizeFolder >= 1000 Then
            WScript.Echo("Dimensione superata per la cartella:" & Chr(13) & Chr(10) & Folder & Chr(13) & Chr(10) & (sizeFolder) & " MB")
        End If
    End If
Next
__________________
.
Thread Ufficiali: EasyCrypt ~ Old Files Manager ~ OSD Clock
The real me is no match for the legend
.

Ultima modifica di x_Master_x : 11-01-2022 alle 07:12.
x_Master_x è offline   Rispondi citando il messaggio o parte di esso