Re: Jak napisać skrypt

Użytkownik "ab" <abed58@igo1.wroc.pl> napisał w wiadomości
news:Xns9D074A3506F98abed58igo1wrocpl@127.0.0.1...
> Potrzebuję regularnie sprawdzić wielkość zajmowaną przez 10
> folderów.

:-)
IMHO zdecydowanie bezpieczniej samemu jednak napisać script'k pex. jn.:

SizeXFolders.vbs
---------------------
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder1 = objFSO.GetFolder("path1")
Set objFolder2 = objFSO.GetFolder("path2")
Set objFolder3 = objFSO.GetFolder("path3")

strR1 = Round(objFolder1.Size/(1024*1024),1)
strR2 = Round(objFolder2.Size/(1024*1024),1)
strR3 = Round(objFolder3.Size/(1024*1024),1)
strR = strR1 + strR2 + strR3

MsgBox "Rozmiar: " & _
    strR & " MB" , _
    vbinformation + vbOKOnly + vbmsgboxsetforeground, _
    " Script vbs: Rozmiar N-folderów " & "by _MB ;-) "
--------
gdzie path1, path2....pathN to ścieżki do danych katalogów.
Wiersze uzupełnić/ograniczyć odpowiednio do wymaganej ilości folderów.

-- 
MICHAL: Mechanical Intelligent Calculation
and Hazardous Assassination Lifeform
BIEK: Being Intended for Exploration
and Killing ...