整理文件.bat

来自「高手lxmxn收集的批处理。包括了批处理教程和他写的几十个很经典的代码。」· Batch 代码 · 共 18 行

::Code by namejm @ bbs.cn-dos.net
::整理当前目录的文件

@echo off
for /f "delims=" %%i in ('dir /a-d /b /oe') do (
    set "nx_name=%%~nxi"
    call :build_dir %%~xi
    set str=%%~xi

)
goto :eof

:build_dir
set var=%1
if not "%nx_name%"=="%~nx0" if not "%str%"=="%1" md %var:~1%文件 2>nul
if not "%nx_name%"=="%~nx0" move /y "%nx_name%" %var:~1%文件
goto :eof