批处理吧 关注：12,558贴子：60,069
- 3回复贴，共1页
以下代码复制粘贴到记事本，另存为xx.bat，编码选ANSI，跟要处理的文件放一起双击运行
echo off&cls
rem 将文件大小大于指定数值的txt文本文件剪切/移动到指定文件夹里
mode con lines=5000
set #=Any question&set _=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%_% %z%
cd /d "%~dp0"
set minsize=20480
set "newfolder=b"
if not exist "%newfolder%\" (md "%newfolder%\")
set "s="
for /l %%a in (1 1 20) do call set "s=%%s%%0"
set "as=%s%%minsize%"
for /f "delims=" %%a in ('dir /a-d-h/b *.txt') do (
set "f=%%a"&set "fsize=%%~za"
setlocal enabledelayedexpansion
set "bs=%s%!fsize!"
if "!bs:~-20!" gtr "!as:~-20!" (echo;"!f!" --^> "%newfolder%\")
endlocal
)
echo;%#% +%$%%$%/%_% %z%
pause
exit
echo off&cls
rem 将文件大小大于指定数值的txt文本文件剪切/移动到指定文件夹里
mode con lines=5000
set #=Any question&set _=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%_% %z%
cd /d "%~dp0"
set minsize=20480
set "newfolder=b"
if not exist "%newfolder%\" (md "%newfolder%\")
set "s="
for /l %%a in (1 1 20) do call set "s=%%s%%0"
set "as=%s%%minsize%"
for /f "delims=" %%a in ('dir /a-d-h/b *.txt') do (
set "f=%%a"&set "fsize=%%~za"
setlocal enabledelayedexpansion
set "bs=%s%!fsize!"
if "!bs:~-20!" gtr "!as:~-20!" (echo;"!f!" --^> "%newfolder%\")
endlocal
)
echo;%#% +%$%%$%/%_% %z%
pause
exit
