フォルダサイズを一覧表示する。
どのフォルダのサイズが大きいかを調べます。
FolderList.CMD フォルダ
@if(0)==(0) ECHO OFF
CScript.exe //NoLogo //E:JScript "%~f0" %*
GOTO :EOF
@end
var fso=new ActiveXObject("Scripting.FileSystemObject");
var Folder=fso.GetFolder(WScript.Arguments.Count()?WScript.Arguments.Item(0):".");
var TotalSize=0;
for(var e=new Enumerator(Folder.SubFolders);!e.atEnd();e.moveNext()){
var f=e.item();
if(f.Name!="System Volume Information"){
var Size=f.Size;
WScript.Echo(LPad(Size,15),f.Name);
TotalSize+=Size;
}
}
for(var e=new Enumerator(Folder.Files);!e.atEnd();e.moveNext()){
var f=e.item();
var Size=f.Size;
WScript.Echo(LPad(Size,15),f.Name);
TotalSize+=Size;
}
WScript.Echo(LPad(TotalSize,15),Folder.Path);
function LPad(str,n){
str=str.toLocaleString();
str=str.substr(0,str.length-3);
return new Array(Math.max(n-str.length,0)+1).join(" ")+str;
}
« FileInfo.MediaInfo.VBS (その2) | トップページ | Windows Media エンコーダを使って、DVD-VideoからWMVへ変換する。(その2) »