[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
除以1024得到其KB单位的大小  当心溢出
  1. @echo off&setlocal enabledelayedexpansion
  2. for /f "delims=" %%i in ('dir /b /a-d *.txt') do (
  3.   set str=%%~zi
  4.   if %%~zi lss 1024 (set k=字节&set z=%%~zi)else set k=KB&call :lp
  5.   call echo  %%~fi !z! !K!
  6.   set z=&set n=&set l=
  7. )
  8. pause&exit
  9. :lp
  10.     set/a l=%l%%str:~,1%%%1024,s=%l%%str:~,1%/1024
  11.     if %z%#==0# set z=
  12.     set z=%z%%s%
  13.     set str=%str:~1%
  14.     if defined str goto lp
  15.     set z=%z%.
  16. :lp1
  17.     set/a l*=10,s=l/1024,n+=1
  18.     if %n% lss 3 (
  19.     set z=%z%%s%
  20.     set/a l=l%%1024
  21.     goto lp1
  22. )
复制代码

[ 本帖最后由 terse 于 2008-10-9 16:37 编辑 ]

TOP

返回列表