[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
拒绝回复不安版规发帖的求助

TOP

  1. //&cls&cscript -nologo -e:jscript "%~f0"&pause&exit
  2. function GetSize(val)
  3. {
  4.     var s ='';
  5.     if(val >= 1125899906842624)
  6.         s = parseInt((val/1125899906842624)*100)/100+' PB';
  7.     else if(val >= 1099511627776)
  8.         s = parseInt((val/1099511627776)*100)/100+' TB';
  9.     else if (val >= 1073741824)
  10.         s = parseInt((val/1073741824)*100)/100+' GB';
  11.     else if (val >= 1048576)
  12.         s = parseInt((val/1048576)*100)/100+' MB';
  13.     else if (val >= 1024)
  14.         s = parseInt((val/1024)*100)/100+' KB';
  15.     else s = val+' 字节';
  16.     return s;
  17. }
  18. var fso = new ActiveXObject('Scripting.FileSystemObject');
  19. var enu = new Enumerator(fso.Drives);
  20. var str = '';
  21. var head = '盘符   类型   总容量   已用容量   剩余容量   使用率   文件系统\r\n'+
  22.     '--------------------------------------------------------------';
  23. for (; !enu.atEnd(); enu.moveNext())
  24. {  
  25.     var drive = enu.item();
  26.     if (drive.isReady)
  27.     {
  28.         var type = '';
  29.         var UsedSpace = drive.TotalSize-drive.FreeSpace;
  30.         switch(drive.DriveType)
  31.         {
  32.             case 0:type = 'Unknown';break;
  33.             case 1:type = 'Removable';break;
  34.             case 2:type = 'Fixed';break;
  35.             case 3:type = 'Network';break;
  36.             case 4:type = 'CD-ROM';break;
  37.             case 5:type = 'RAM disk';break;
  38.             default:type = 'Unknown';
  39.         }
  40.         str += drive.DriveLetter+'   '+type+'   '+
  41.             GetSize(drive.TotalSize)+'   '+
  42.                 GetSize(UsedSpace)+'   '+
  43.                     GetSize(drive.FreeSpace)+'   '+
  44.                         parseInt(UsedSpace/drive.TotalSize*100)+'%   '+
  45.                             drive.FileSystem+'\r\n';
  46.     }
  47. }  
  48. WSH.echo(head+'\r\n'+str);
复制代码
1

评分人数

TOP

返回列表