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

青青草 · 发表于 2021-7-2 11:46:11

本帖最后由青青草于 2021-7-25 10:48 编辑

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

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

复制代码

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

@echo off
setlocal EnableDelayedExpansion
set maxn=0
set size=0
for /f "tokens=1-3" %%a in ('wmic logicaldisk where "DriveType='3'" get freespace^,name^,size^|find ":"')do (
set space=%%a
call :Length space n
if !n! gtr !maxn! (
set maxn=!n!
set size=!space!
set maxdisk=%%b
)
if "!n!" EQU "!maxn!" (
if "!space!" gtr "!size!" (
set size=!space!
set maxdisk=%%b
)
)
echo 分区%%b 大小：%%c 字节剩余 !space! 字节
)
echo 硬盘剩余最大: 分区 !maxdisk! 剩余: %size% 字节
pause
:Length
setlocal enabledelayedexpansion
set "$=!%1!#"
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)
set "s=!s!fedcba9876543210" &set/a "len+=0x!s:~16,1!"
:ok
endlocal&set/a "%2=%len%"
goto:eof

复制代码

青青草 · 发表于 2021-7-2 12:18:26

bfgxp 发表于 2021-7-2 12:10
不错，以前一直想要这么一个脚本，虽然后来我用au3实现了。
还是喜欢批处理的直接。

青青草 · 发表于 2021-7-4 14:59:50

江南一根葱发表于 2021-7-4 00:08
抄了个，可以

剩余空间的大小显示不准确。

青青草 · 发表于 2021-7-4 18:11:13

bfgxp 发表于 2021-7-2 12:10
不错，以前一直想要这么一个脚本，虽然后来我用au3实现了。
还是喜欢批处理的直接。

已更新，显示剩余空间容量更精确！

青青草 · 发表于 2021-7-5 09:45:02

ESD 发表于 2021-7-2 17:05
这个代码连setlocal ENABLEDELAYEDEXPANSION都没有加上，你发出来作甚呢？

这么简单的事情，谁不会？自己加上不就得了。

青青草 · 发表于 2021-7-5 21:23:55

610644034 发表于 2021-7-5 21:03
批处理实现起来没有压力啊！

青青草 · 发表于 2021-7-15 20:21:06

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

我于 Windows XP/Window ...

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

青青草 · 发表于 2021-7-16 10:31:39

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

谢谢！

青青草 · 发表于 2021-7-16 10:36:28

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

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

青青草 · 发表于 2021-7-16 10:37:40

本帖最后由青青草于 2021-7-16 10:39 编辑

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

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

青青草 · 发表于 2021-7-16 10:40:10

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

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

青青草 · 发表于 2021-7-16 10:40:34

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

青青草 · 发表于 2021-7-16 10:41:15

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

青青草 · 发表于 2021-7-25 10:53:35

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

已更新！

青青草 · 发表于 2021-7-25 10:54:05

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

已更新！

青青草 · 发表于 2021-7-25 10:54:16

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

已更新！

		自动登录	找回密码
密码			注册