联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!
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