Set objFSO = CreateObject("Scripting.FileSystemObject")
Set colDrives = objFSO.Drives
For Each objDrive in colDrives
Wscript.Echo objDrive.DriveLetter & " 盘的可用空间是" & FormatNumber(objDrive.FreeSpace/1024/1024,0) & "MB，总容量是 " & FormatNumber(objDrive.TotalSize/1024/1024,0) & "MB"
Next[ Last edited by exzzz on 2009-1-10 at 18:33 ]