批处理提取文件名和大小并写入csv文件

@echo off
(for /f "delims=" %%a in ('dir /a-d /b/on,*.zip,*.7z,*.rar') do (
if %%~za lss 1024 (
echo;%%a %%~za字节
) else (
if %%~za lss 1048576 (
set /a size=%%~za/1024+1 2>nul&&call echo;%%~na ,%%size%%KB
) else (
set /a size=%%~za/1048576 2>nul&&call echo;%%~na ,%%size%%MB
))))>>提取文件名和大小.csv