批处理系列6：查找剩余空间最大的磁盘盘符（终稿）

青青草

现在的硬盘都是大容量，需考虑批处理计算时受到位数的限制，故再次更新如下：

1. @echo off
   
2. setlocal EnableDelayedExpansion
   
3. set zero=0000000000000000000000000000000000000000
   
4. set size=!zero!1
   
5. for /f "tokens=1-3" %%a in ('wmic logicaldisk where "DriveType='3'" get freespace^,name^,size^|find ":"')do (
   
6.     for /f "tokens=1,2,3 delims= " %%i in ("%%c") do (
   
7. set space=%%a
   
8. set free=!zero!!space!
   
9. if "!free:~-40!" gtr "!size:~-40!" (
   
10. set  size=!free:~-40!
    
11. set maxdisk=%%b
    
12. set mb=!space!
    
13. )
    
14. echo 分区%%b   大小：%%c 字节     剩余 !space! 字节
    
15. )
    
16. )
    
17. echo 硬盘剩余最大: 分区 !maxdisk!     剩余: %mb% 字节
    
18. pause

复制代码

      利用字符串比较，较好地解决了批处理计算时受位数限制问题，代码较为简洁。位数预设了40位，应该足够了。
      虽然位数预设了40位，足够用了，但总感觉缺点什么；对了，预设40位，还是受到限制，代码不够通用。故修改如下：

1. @echo off
   
2. setlocal EnableDelayedExpansion
   
3. set maxn=0
   
4. set size=0
   
5. for /f "tokens=1-3" %%a in ('wmic logicaldisk where "DriveType='3'" get freespace^,name^,size^|find ":"')do (
   
6.         set space=%%a
   
7.          call :Length space n
   
8.               if !n! gtr !maxn! (
   
9.                    set  maxn=!n!
   
10.                    set  size=!space!
    
11.                    set maxdisk=%%b
    
12.                )
    
13.               if "!n!" EQU "!maxn!" (
    
14.                   if "!space!" gtr "!size!" (
    
15.                      set  size=!space!
    
16.                      set maxdisk=%%b
    
17.                    )               
    
18.                )
    
19. echo 分区%%b   大小：%%c 字节     剩余 !space! 字节
    
20. )
    
21. echo 硬盘剩余最大: 分区 !maxdisk!     剩余: %size% 字节
    
22. pause
    
23. 
    
24. :Length
    
25. setlocal enabledelayedexpansion
    
26. set "$=!%1!#"
    
27. set "len="&for %%a in (4096 2048 1024 256 128 64 32 16 8 4 2 1) do (if "!$:~%%a,1!" NEQ "" set/a len+=%%a&set "$=!$:~%%a!" &if "!$:~1!"=="" goto ok)
    
28. set "s=!s!fedcba9876543210" &set/a "len+=0x!s:~16,1!"
    
29. :ok
    
30. endlocal&set/a "%2=%len%"
    
31. goto:eof
    

复制代码

文三快

来看看怎么样

pda8888

只找最大剩余空间的盘符，只用dir /-c 矣。
思路：
1、获得 C-Z盘的剩余空间 ，得到一个数组freespace[0].drive、freespace[0].freesize、freespace[1].drive、freespace[1].freesize……freespace[n].drive、freespace[n].freesize，其中，freespace[n].freesize根据其长度，前导补0，使得每个freespace[n].freesize的长度相同，比如：40位。
2、利用set 命令排序，见：http://bbs.wuyou.net/forum.php?mod=viewthread&tid=437821

1. 运行下面批处理：
   
2. @echo off&setlocal enabledelayedexpansion
   
3. for /l %%i in (1,1,4) do set "kong=!kong!#"
   
4. for /f "tokens=1,2 delims=." %%i in (11.txt) do (
   
5. set p=%%i
   
6. set "str=!p!%kong%"
   
7. call set "a=!str:~,4!"
   
8. call set "a=%%a:!p!=%%"
   
9. if not "%%j"=="" (set "_!a!!p!.%%j=a") else set "_!a!!p!=a"
   
10. )
    
11. echo.
    
12. echo.
    
13. for /f "delims==_" %%i in ('set _') do (
    
14. set "str=%%i"
    
15. echo !str:#=!
    
16. )
    
17. pause>nul

复制代码

2012飘水

学习了，感谢分享

创新科技2015

感谢分享

青青草

nianyueriPE 发表于 2021-7-24 15:30
挺好用的，正需要。

已更新！

青青草

chenfine 发表于 2021-7-20 13:45
学习

已更新！

青青草

鲧尧 发表于 2021-7-20 09:43
感谢分享

已更新！

nianyueriPE

挺好用的，正需要。

chenfine

学习

鲧尧

感谢分享

dos时代菜鸟

这是用 dir 获取磁盘剩余空间 用的。不需要外部程序，不需要 find

free-2.7z (613 Bytes, 下载次数: 14)

2021-7-16 21:23 上传

点击文件名下载附件
下载积分: 无忧币 -2

plusv

dos时代菜鸟 发表于 2021-7-16 20:33
用 fsutil 肯定不支持 fat ，另外 为了 获取 卷标，分区格式，介质类型 等信息，必然要多次运行 fsutil , ...

于 Windows 7 X64 测试通过.

41F 格式会跑掉,不对齐问题,我已自行修正,
我是比较喜欢 41F,因为刚好能塞满 80x25 CMD Console.

综合全楼,
1. OS 兼容性(Windows XP/Windows 7 X64/Windows 10 X64).
2. 运行效率.
3. 多功能性.

19F 807979023 的批处理是首选.

dos时代菜鸟

free-1.7z (872 Bytes, 下载次数: 6)

2021-7-16 20:28 上传

点击文件名下载附件
下载积分: 无忧币 -2

用 fsutil 肯定不支持 fat ，另外 为了 获取 卷标，分区格式，介质类型 等信息，必然要多次运行 fsutil ,效率会慢一些，
有的系统下 有 逗号 分割 尺寸大小，还需要 对文本流进行格式统一，效率也会慢一些。

遗憾的是，目前看 ，这个功能 不管怎样 最终 都需要用 外部命令来完成 wmic /fsutil 都属于 外部命令，如果用 内部命令，也就 dir 了，但是有 有 中英文的问题，不够通用。

dos时代菜鸟

嗯嗯 fsutil 也有不足，不过，
找最大剩余，估计 fat 分区里面 是不够的。

junyee

dos时代菜鸟 发表于 2021-7-16 10:43
用 fsutil  获取 盘符列表，分区格式 卷标 分区类型，如果 找不出 分区格式 就认为不是本地盘可 ...

fsutil 不支持 FAT ，以及某些设备的分区。。

plusv

dos时代菜鸟 发表于 2021-7-16 10:43
用 fsutil  获取 盘符列表，分区格式 卷标 分区类型，如果 找不出 分区格式 就认为不是本地盘可 ...

在我 12 年老 PC 测试.

1.fsutil 效率慢一点.
2. D: T: 格式会跑掉,不对齐.
3. 本地硬盘 G: FAT 没列出.

PS:
C:\>fsutil volume diskfree g:
FSUTIL 公用程式需要本机 NTFS 磁碟区。

dos时代菜鸟

free.7z (816 Bytes, 下载次数: 7)

2021-7-16 10:42 上传

点击文件名下载附件
下载积分: 无忧币 -2

用 fsutil  获取 盘符列表，分区格式 卷标 分区类型，如果 找不出 分区格式 就认为不是本地盘可能是网盘或者光盘，不在统计之列。

青青草

vvt1321 发表于 2021-7-16 10:16
在看

青青草

dos时代菜鸟 发表于 2021-7-16 09:47
再来个 fsutil 的

青青草

junyee 发表于 2021-7-16 09:45
同是脚本语言和 bash 一比，cmd.exe 就是弱鸡。

ps 学习成本略高，而且老系统不一定有，版本多，有不兼 ...

青青草

807979023 发表于 2021-7-16 09:10
测试通过，由于截图保存在e盘，所以e盘剩余字节依次减少。
c盘是win7x32，win7x64安装后放在c盘一个文件 ...

谢谢！利用字符串比较，解决了位数限制问题，代码较为简洁。

青青草

plusv 发表于 2021-7-16 01:45
我 12 年老 PC,
Windows 7 X64 : 主系统.
Windows XP(在 VMWare 中) : 测试软件.

谢谢！
在我的系统Windows 10和Windows10PE中测试也均正常。

青青草

nttwqz 发表于 2021-7-14 14:30
dfp /drives /b
貌似是8.1系统独有命令，复制到10下可用

谢谢！

dos时代菜鸟

再来个 fsutil 的

1. @echo off
   
2. setlocal  ENABLEDELAYEDEXPANSION
   
3. for /f "delims=" %%c in ('fsutil fsinfo drives') do (call :x_drv %%c)
   
4. pause
   
5. goto :eof
   
6. 
   
7. :x_bit
   
8. rem 用于计算传递过来的 字符串参数 的字符个数。 返回变量 bit1
   
9.     set "str1=%1"
   
10.     for /l %%r in (0,1,18) do (
    
11.         if not "!str1:~%%r,1!"=="" (
    
12.             set  bit1=%%r
    
13.         )
    
14.     )
    
15. exit /b
    
16. 
    
17. :x_drv
    
18.         set bit=0
    
19.         set free1=0
    
20.         set free2=0
    
21.         :loop1
    
22.                 shift
    
23.                 if exist %1 (
    
24.                         set /a n=0
    
25.                         for /f "tokens=2 delims=#:^(" %%j in ('fsutil volume diskfree %1') do (
    
26.                                 set /a n=!n!+1
    
27.                                 if !n! equ 1 (
    
28.                                         call:x_bit %%j
    
29.                                         set free=%%j
    
30.                                         set free=!free: =!
    
31.                                         set free22=!free:~-9!
    
32.                                         if !bit1! geq 9 (set free11=!free:~0,-9!) else (set free11=0)
    
33.                                         if !bit1! geq !bit! (
    
34.                                                 set bit=!bit1!
    
35.                                                 if !free11! geq !free1! (
    
36.                                                         if !free11! gtr !free1! set free2=!free22!
    
37.                                                         set free1=!free11!
    
38.                                                         if !free22! geq !free2! (
    
39.                                                                 set free2=!free22!
    
40.                                                                 set drv=%1
    
41.                                                         )
    
42.                                                 )
    
43.                                         )
    
44.                                         if "!drv!"=="%1" ( echo %1 !free11!,!free22!        *) else (echo %1 !free11!,!free22!)
    
45.                                 )
    
46.                         )
    
47.                 )
    
48.         if not "%2"=="" goto loop1
    
49.         echo.
    
50.         echo !drv! !free1!!free2!
    
51. exit /b

复制代码

junyee

同是脚本语言和 bash 一比，cmd.exe 就是弱鸡。

ps 学习成本略高，而且老系统不一定有，版本多，有不兼容现象。

807979023

青青草 发表于 2021-7-15 20:21
已再次更新代码，麻烦你测试一下。
谢谢！

测试通过，由于截图保存在e盘，所以e盘剩余字节依次减少。
c盘是win7x32，win7x64安装后放在c盘一个文件夹中，需要时与根目录系统交换位置。
d盘是winxp，h盘是win10x64，启动后盘符为c，原c盘被隐藏。
所以都是同一硬盘实机测试。

plusv

青青草 发表于 2021-7-15 20:21
已再次更新代码，麻烦你测试一下。
谢谢！

我 12 年老 PC,
Windows 7 X64 : 主系统.
Windows XP(在 VMWare 中) : 测试软件.
Windows 10 PE(在 VMWare 中) : 测试软件.
Windows 10 (一台小 NoteBook 中) : 没什么在用,一个月开机一次.

批处理在 Windows XP/Windows 7 X64 测试正常,
下午于 Windows 10 (一台小 NoteBook 中) 测试完 26F 文后就收起来了，
试了两个 Windows 10 PE(在 VMWare 中)无 WMIC,所以无法测试.

plusv

807979023 发表于 2021-7-15 19:27
哪里改错了？

我 12 年老 PC,
Windows 7 X64 : 主系统.
Windows XP(在 VMWare 中) : 测试软件.
Windows 10 PE(在 VMWare 中) : 测试软件.
Windows 10 (一台小 NoteBook 中) : 没什么在用,一个月开机一次.

批处理在 Windows XP/Windows 7 X64 测试正常,
下午于 Windows 10 (一台小 NoteBook 中) 测试完 26F 文后就收起来了，
试了两个 Windows 10 PE(在 VMWare 中)无 WMIC,所以无法测试.

青青草

plusv 发表于 2021-7-15 18:28
807979023> 加格式和卷名后，xp  win7x32  win7x64 测试通过，win10x64失败。

我于 Windows XP/Window ...

已再次更新代码，麻烦你测试一下。
谢谢！

807979023

plusv 发表于 2021-7-15 18:28
807979023> 加格式和卷名后，xp  win7x32  win7x64 测试通过，win10x64失败。

我于 Windows XP/Window ...

哪里改错了？

1. @echo off&color 1f&echo.
   
2. setlocal ENABLEDELAYEDEXPANSION
   
3. for /f "delims=g" %%a in ('cmd /u /c Echo,有') do set "Tab=%%a"
   
4. set w=wmic logicaldisk where "DriveType='3'"
   
5. set /a max=1
   
6. for /f "tokens=1-5" %%a in ('%w% get FileSystem^,freespace^,name^,size^,VolumeName^|find ":"')do (
   
7.   set /p=分区%%c%Tab%<nul
   
8.   call :GetSize %%b000 free
   
9.   call :GetSize %%d000 size
   
10.   set /a used=size-free
    
11.   if !size! gtr 102400 (
    
12.     set "G=GB" & set /a size/=1024,used/=1024
    
13.   ) else set "G=MB"
    
14.   set /a used=1000*used/size
    
15.   if "!used:~,-1!" == "" set "used=0!used!"
    
16.   set /p=大小: !size:~,-2!.!size:~-2!!G!%Tab%<nul
    
17.   set free1=!free!
    
18.   if !free! gtr 102400 (set /a free/=1024 & set "G=GB") else set "G=MB"
    
19.   set /p=剩余: !free:~,-2!.!free:~-2!!G!%Tab%<nul
    
20.   set /p=使用率: !used:~,-1!.!used:~-1!%%%Tab%<nul
    
21.   set /p=卷标: %%e%Tab%<nul
    
22.   set /p=格式: %%a%Tab%<nul & echo,
    
23.   if !free1! gtr !max! set max=!free1!&&set mb=!free:~,-2!.!free:~-2!!G!&&set bc=%%c
    
24. )
    
25. echo.&echo 分区剩余最大: 分区%bc%    剩余: %mb%
    
26. echo.&echo 按任意键退出...&pause >nul&exit
    
27. 
    
28. :GetSize
    
29. set "num=%1" & set "n=" & set "%2="
    
30. for %%a in (16 8 4 2 1) do (
    
31.   if not "!num:~%%a!"=="" set /a n+=%%a & set "num=!num:~%%a!"
    
32. )
    
33. set "num=%1" & set /a n-=6
    
34. for /l %%a in (!n! -1 1) do (
    
35.   set "s=!num:~,-%%a!"
    
36.   if "!s:~,1!" == "0" set "s=!s:~1!"
    
37.   set /a m=s%%1048576,s/=1048576
    
38.   set "%2=!%2!!s!"
    
39.   set "num=!m!!num:~-%%a!"
    
40. )
    
41. if not defined %2 (
    
42.   set "%2=!num:~,-1!"
    
43. ) else if "!%2:~,1!" == "0" set "%2=!%2:~1!"
    
44. goto :EOF
    

复制代码