Batch file collation (face-to-face directory) _dos/bat

Copy Code code as follows:

@echo off
Title File Collation Manager

:: Objective:
::
:: Categorize the different files in the current directory (do not process subdirectories)
::
:: 2006-12-16 modified a mistake

for/f "delims="%%i in (' dir/a-d/b/oe ') do (
Set "Nx_name=%%~nxi"
Call:build_dir%%~xi
Set File_type=%%~xi

)
Goto:eof

REM ======= Create a folder by file type =======
: Build_dir
Set types=%1
Set types=%types:~1%

:: Determine if the file to be processed is a batch process itself
If "%nx_name%" = = "%~nx0" (set File_self=yes&set file_type=) Else set file_self=

:: Determine if a file type has changed
If "%file_type%" = = "%1" (set Same_type=yes) Else set same_type=

If not defined file_self if not defined same_type MD%types% file 2>nul
If not defined file_self move/-y "%nx_name%"%types% file
Goto:eof