批处理之家 - Powered by Discuz! Board

@echo off&setlocal EnableDelayedExpansion&cd /d "%~dp0"&title %~nx0
echo 磁盘剩余总大小
for /f "tokens=1,2,3 delims= " %%a in ('wmic logicaldisk get Caption^,Size^,FreeSpace ^|findstr [0-9] ') do (
rem echo %%a %%b %%c
call :getTGMK %%b Size
set "Size= !Size!"
set Size=!Size:~-7!
call :getTGMK %%c FreeSpace
set "FreeSpace= !FreeSpace!"
set FreeSpace=!FreeSpace:~-7!
echo %%a !Size! !FreeSpace!
)
echo;&pause
exit
:getTGMK
setlocal
set S=000000000000000000%1
set S=%S:~-18%
if "%S%" GEQ "000001099511627776" (
for /f %%c in ('powershell -c "[Math]::Truncate(%1/1099511627776)"') do (endlocal & set %2=%%cTB&goto :EOF)
) else (
if "%S%" GEQ "000000001073741824" (
for /f %%c in ('powershell -c "[Math]::Truncate(%1/1073741824)"') do (endlocal & set %2=%%cGB&goto :EOF)
) else (
if "%S%" GEQ "000000000001048576" (
for /f %%c in ('powershell -c "[Math]::Truncate(%1/1048576)"') do (endlocal & set %2=%%cMB&goto :EOF)
) else (
if "%S%" GEQ "000000000000001024" (
for /f %%c in ('powershell -c "[Math]::Truncate(%1/1024)"') do (endlocal & set %2=%%cKB&goto :EOF)
) else (
endlocal & set %2=%1B&goto :EOF
))))
goto :EOF

复制代码

:getTGMK
setlocal
for /f "usebackq" %%c in (`powershell -c "$i=%~1;('TB',1tb),('GB',1gb),('MB',1mb),('KB',1kb),('B',1)|foreach{if($i -ge $_[1]){''+[math]::Truncate($i/$_[1])+$_[0];break}}"`) do (
endlocal & set %~2=%%c&goto :EOF
)

复制代码

@echo off &echo,磁盘剩余总大小
wmic logicaldisk get Caption^,Size^,FreeSpace|findstr "[0-9][0-9]*"|powershell "$input|%%{$a=$_ -split '[ ]+';if($a.count -gt 1){$x,$y,$ux,$uy=[int64]$a[1],[int64]$a[2],'GB','GB';if($x -ge 1tb){$x/=1tb;$ux='TB'}else{$x/=1gb};if($y -ge 1tb){$y/=1tb;$uy='TB'}else{$y/=1gb};$a[0]+"""`t"""+$x.tostring(0)+$ux+"""`t"""+$y.tostring(0)+$uy}}"
pause&exit/b

复制代码

@echo off&setlocal EnableDelayedExpansion&cd /d "%~dp0"&title %~nx0
echo 磁盘剩余总大小
for /f "tokens=1,2,3 delims= " %%a in ('wmic logicaldisk get Caption^,Size^,FreeSpace ^|findstr [0-9] ') do (
set "str=!str! %%a %%b %%c?"
)
echo,!str!|powershell -c "$j=$input -split '\?';$j|foreach{[regex]::replace($_,'\d+',{$i=[decimal]$args[0].value;('TB',1tb),('GB',1gb),('MB',1mb),('KB',1kb),('B',1)|foreach{if($i -ge $_[1]){'{0,7}' -f (''+[math]::Truncate($i/$_[1])+$_[0]);$i=0;}}})}"
pause
endlocal&exit/b

复制代码