@ECHO OFF
SETLOCAL ENABLEDELAYEDEXPANSION
rem The following setting for the source directoryis a name
rem that I use for testing and deliberately includes spaces to make sure
rem that the process works using such names. These will need to be changed to suit your situation.
SET "sourcedir=u:\your files"
PUSHD "%sourcedir%"
FOR /L %%s IN (0,1,9) DO FOR /L %%t IN (0,1,9) DO IF EXIST "* S%%s%%tE*" (
FOR /L %%e IN (0,1,9) DO FOR /L %%f IN (0,1,9) DO IF EXIST "* S%%s%%tE%%e%%f -*" (
FOR /f "delims=" %%b IN ('dir /b /a-d "* S%%s%%tE%%e%%f -*"') DO (
SET "fullname=%%b"
FOR /f "tokens=1,2delims=:" %%q IN ("!fullname: S%%s%%tE%%e%%f =:!") DO (
IF %%s==0 (
rem MD "%%q\%%t" 2>nul
rem MOVE "%%b" "%%q\%%t\" >nul
ECHO MD "%%q\%%t"
ECHO MOVE "%%b" "%%q\%%t\"
) ELSE (
rem MD "%%q\%%s%%t" 2>nul
rem MOVE "%%b" "%%q\%%s%%t\" >nul
ECHO MD "%%q\%%s%%t"
ECHO MOVE "%%b" "%%q\%%s%%t\"
)
)
)
)
)
dir/s
popd
GOTO :EOF
@ECHO OFF
SETLOCAL ENABLEDELAYEDEXPANSION
rem The following setting for the source directoryis a name
rem that I use for testing and deliberately includes spaces to make sure
rem that the process works using such names. These will need to be changed to suit your situation.
SET "sourcedir=u:\your files"
PUSHD "%sourcedir%"
FOR /L %%s IN (0,1,9) DO FOR /L %%t IN (0,1,9) DO IF EXIST "* S%%s%%tE*" (
FOR /L %%e IN (0,1,9) DO FOR /L %%f IN (0,1,9) DO IF EXIST "* S%%s%%tE%%e%%f -*" (
FOR /f "delims=" %%b IN ('dir /b /a-d "* S%%s%%tE%%e%%f -*"') DO (
SET "fullname=%%b"
FOR /f "tokens=1,2delims=:" %%q IN ("!fullname: S%%s%%tE%%e%%f =:!") DO (
IF %%s==0 (
rem MD "%%q\%%t" 2>nul
rem MOVE "%%b" "%%q\%%t\" >nul
ECHO MD "%%q\%%t"
ECHO MOVE "%%b" "%%q\%%t\"
) ELSE (
rem MD "%%q\%%s%%t" 2>nul
rem MOVE "%%b" "%%q\%%s%%t\" >nul
ECHO MD "%%q\%%s%%t"
ECHO MOVE "%%b" "%%q\%%s%%t\"
)
)
)
)
)
dir/s
popd
GOTO :EOF
This batch is designed to REPORT what it intends to do, and should be tested against a test directory before applying it to your live data.
When you are satisfied with the results, remove the rem comment keyword from the two md and move lines to activate. The echo lines may be removed if desired.
The dir/s at the end simply shows the result.
The key here is the string S??E??.
by using %%s and %%t each set to 0..9 in turn, we can see whether a file named * S00E*..* S99E* exists. If such a file exists, repeat the recipe using %%e and %%f to find * S00E00 -*..* S99E99 -*.
Then grab a list of the filenames using /b for names-only and /a-d for no directorynames, matching the specific S??E?? string calculated, and assign to %%b.
We need to analyse %%b so need delayedexpansion and transfer to a regular variable fullname to do so.
Since the filename does not contain :, simply replace the S??E?? detected by : and use for/ftokens and delims options to break the name at the S??E?? -> :%%r is set to the part after and %%q to that before. %%r is not used in this process.
Then it's a matter of establishing the subdirectory in %%q and the sub-subdirectory in %%s or %%s%%t.
The 2>nul suppresses the directory exists messages created if a directory is re-created, and the >nul on the move command suppresses the 1 file(s) moved message.
@ECHO OFF
SETLOCAL EnableDelayedExpansion
FOR %%a in (*) DO (
SET FileName=%%~na
CALL:findString FileName ") S" pos
SET /A pos=pos+1
SET /A pos2=pos+2
CALL SET "NewFolderName=%%FileName:~0,!pos!%%"
CALL SET "NewSubFolderNumber=%%FileName:~!pos2!,2%%"
SET /A NewSubFolderNumber=NewSubFolderNumber
SET NewSubFolder="%%~pa!NewFolderName!\SubFolderName !NewSubFolderNumber!\"
SET str="%%~fa" !NewSubFolder!
MD !NewSubFolder!
MOVE !str!
)
:findString -- returns position of first occurrence of a string in another string, case sensitive, maximum string length is 1023 characters
:: -- %~1: in - varible name of a string to be searched
:: -- %~1: in - string to be found
:: -- %~3: out- return variable name, will be set to position or undefined if string not found
:credit belongs to
:$source http://www.dostips.com
:Posted By: DosItHelp
:Expert
:Posts: 239
:Joined: 18 Feb 2006 19:54
SETLOCAL ENABLEDELAYEDEXPANSION
set "pos="
set "str=!%~1!"
for /L %%a in (0,1,1023) do (
set "s=!str:~%%a!"
if not defined pos if "%~2!s:*%~2=!"=="!s!" set "pos=%%a"
)
ENDLOCAL & IF "%~3" NEQ "" SET "%~3=%pos%"
GOTO:EOF
希望这可以帮助他人。
Painfully came up with a ver1.0.
Not fool-proof yet but does the job for now. Kind of slow though. Needs some tuning up from a kind expert out there, maybe a far better approach or even an overhaul.
Your kind suggestions are very much welcome.
@ECHO OFF
SETLOCAL EnableDelayedExpansion
FOR %%a in (*) DO (
SET FileName=%%~na
CALL:findString FileName ") S" pos
SET /A pos=pos+1
SET /A pos2=pos+2
CALL SET "NewFolderName=%%FileName:~0,!pos!%%"
CALL SET "NewSubFolderNumber=%%FileName:~!pos2!,2%%"
SET /A NewSubFolderNumber=NewSubFolderNumber
SET NewSubFolder="%%~pa!NewFolderName!\SubFolderName !NewSubFolderNumber!\"
SET str="%%~fa" !NewSubFolder!
MD !NewSubFolder!
MOVE !str!
)
Seek and ye shall find. Found this missing link somewhere in the net just in time to save my remaining lock of hair. (Anyone knows why there isn't a built-in INSTR() function in the first place?)
:findString -- returns position of first occurrence of a string in another string, case sensitive, maximum string length is 1023 characters
:: -- %~1: in - varible name of a string to be searched
:: -- %~1: in - string to be found
:: -- %~3: out- return variable name, will be set to position or undefined if string not found
:credit belongs to
:$source http://www.dostips.com
:Posted By: DosItHelp
:Expert
:Posts: 239
:Joined: 18 Feb 2006 19:54
SETLOCAL ENABLEDELAYEDEXPANSION
set "pos="
set "str=!%~1!"
for /L %%a in (0,1,1023) do (
set "s=!str:~%%a!"
if not defined pos if "%~2!s:*%~2=!"=="!s!" set "pos=%%a"
)
ENDLOCAL & IF "%~3" NEQ "" SET "%~3=%pos%"
GOTO:EOF
发布评论
评论（2）
该批次旨在报告它打算做什么，应在将其应用于实时数据之前对测试目录进行测试。
当您对结果感到满意时，请从两个
md和移动行中删除rem评论关键字以激活。如果需要，可以删除echo行。最后，
dir/s简单地显示结果。这里的键是字符串
s ?? e ??。通过使用
%% S和%% T每个设置为0..9依次可以看到是否存在名为* S00E*的文件。* S99E*存在。如果存在这样的文件，请使用%% e和%% f重复配方，以找到* s00e00-*..** S99E99-*。然后使用
/bfor Note-code>/AD 捕获文件名的列表，而无目录名称>与特定的s ?? e ??匹配，并匹配。字符串计算，并分配给%% B。我们需要分析
%% b，因此需要delayedexpansion并将其转移到常规变量fullname进行此操作。由于文件名不包含
：，只需替换s ??由检测到的：：并使用for/f </code> 令牌和 delims 在s ?? e ??中打破名称的选项。 - ＆gt; ：%% r已在此之前设置为%% q。%% r在此过程中不使用。然后，这是在
%% Q中建立子目录的问题，以及%% S或%% s %% T中的子标准。2＆gt; nul如果重新创建了目录，则抑制目录消息，而＆gt; nul在上移动命令抑制1文件移动消息。This batch is designed to REPORT what it intends to do, and should be tested against a test directory before applying it to your live data.
When you are satisfied with the results, remove the
remcomment keyword from the twomdandmovelines to activate. Theecholines may be removed if desired.The
dir/sat the end simply shows the result.The key here is the string
S??E??.by using
%%sand%%teach set to0..9in turn, we can see whether a file named* S00E*..* S99E*exists. If such a file exists, repeat the recipe using%%eand%%fto find* S00E00 -*..* S99E99 -*.Then grab a list of the filenames using
/bfor names-only and/a-dfor no directorynames, matching the specific S??E?? string calculated, and assign to%%b.We need to analyse
%%bso needdelayedexpansionand transfer to a regular variablefullnameto do so.Since the filename does not contain
:, simply replace theS??E??detected by:and usefor/ftokens and delims options to break the name at theS??E?? -> :%%ris set to the part after and%%qto that before.%%ris not used in this process.Then it's a matter of establishing the subdirectory in
%%qand the sub-subdirectory in%%sor%%s%%t.The
2>nulsuppresses thedirectory existsmessages created if a directory is re-created, and the>nulon themovecommand suppresses the1 file(s) movedmessage.痛苦地提出了Ver1.0。
目前还没有傻瓜。虽然很慢。需要从那里的专家进行一些调整，也许是更好的方法，甚至大修。
非常欢迎您的建议。
寻找，你们会找到。在网中的某个地方找到了此缺失的链接，以节省我剩余的头发锁。 （任何人都知道为什么首先没有内置的instr（）功能？）
希望这可以帮助他人。
Painfully came up with a ver1.0.
Not fool-proof yet but does the job for now. Kind of slow though. Needs some tuning up from a kind expert out there, maybe a far better approach or even an overhaul.
Your kind suggestions are very much welcome.
Seek and ye shall find. Found this missing link somewhere in the net just in time to save my remaining lock of hair. (Anyone knows why there isn't a built-in INSTR() function in the first place?)
Hope this can help others.