沙拉油
台灣水電工

離線
會員性別: 
文章: 307
Win xp Duron 800 ADSL Office XP
|
將底下的程式碼複製並貼到「記事本」內,然後存成 x.vbs ,存在任意的資料夾內,假設存在 C:\ 好了 存檔後執行,開始 >> 執行>> 輸入 c:\x.vbs "目標資料夾" >> 確定 例如執行 c:\x.vbs "C:\Documents and Settings\All Users" 後就會一一顯示 All Users 底下的所有資料夾的大小
Set fso = CreateObject("Scripting.FileSystemObject") Set fld = fso.GetFolder(WScript.Arguments(0)) For Each fd In fld.Subfolders Msgbox "("&fd.name&")"&"資料夾的大小是 "&round(fd.size/1048576,2)&" MB" Next
|