@echo off
for /f "delims=" %%a in ('dir /b/on *.jpg') do (
for /f "tokens=1,2,3,4,5,6,7,8 delims= " %%i in ("%%a") do (
  echo %%m|find /i ".jpg"&&md "%%i %%j %%k %%l">nul 2>nul&move %%a "%%i %%j %%k %%l"\>nul 2>nul
  echo %%n|find /i ".jpg"&&md "%%i %%j %%k %%l %%m">nul 2>nul&move %%a "%%i %%j %%k %%l %%m"\>nul 2>nul
  echo %%o|find /i ".jpg"&&md "%%i %%j %%k %%l %%m %%n">nul 2>nul&move %%a "%%i %%j %%k %%l %%m %%n"\>nul 2>nul
  echo %%p|find /i ".jpg"&&md "%%i %%j %%k %%l %%m %%n %%o">nul 2>nul&move "%%a" "%%i %%j %%k %%l %%m %%n %%o"\>nul 2>nul
))
pause
复制代码

/*&cls
@echo off
for /f "delims=" %%a in ('dir /a-d/b "* *.jpg"^|cscript -nologo -e:jscript "%~f0"') do (
  md "%%a\"
  move /y "%%a*.jpg" "%%a\"
)
pause&exit
*/

var t='', map={}, files = WScript.StdIn.ReadAll().split('\r\n');
for (var i=0; i<files.length; i++){
    var str = files[i].replace(/\s+\S+$/,'')
    if(!map[str]){map[str] = true;t+=str+'\r\n';}
}
WSH.echo(t);
复制代码

echo %%p|find /i ".jpg"&&md "%%i %%j %%k %%l %%m %%n %%o">nul 2>nul&move "%%i %%j %%k %%l %%m %%n %%o*.jpg" "%%i %%j %%k %%l %%m %%n %%o"\>nul 2>nul
复制代码

@echo off&setlocal enabledelayedexpansion
rem:核心区域文件夹名称获取,方法还有几种和这种基本类似
for /f "delims=" %%i in ('type ".\1.txt"')do (
 set "name_nx=%%~nxi"
 set "name_nx=!name_nx: =\!"
 for /f "delims=" %%j in ("!name_nx!")do (
  set "name=%%~nxi"
  set "name=!name: %%~nxj=!"
  echo,建立文件夹:!name!
  echo,文件名:%%~nxi
 )
)
pause
复制代码