for /f "delims=_" %J in ("стро_ка") do rem Что то делаем с %J - частью строки до "_"
for %I in (*.jpg) do for /f "delims=_" %J in ("%I") do (
if not exist "%J\" md "%J"
move "%~I" "%J\"
)
%
на %%
. dir
Directory of C:\Users\Serguei\AppData\Local\Temp\xxx
11/18/2020 09:46 AM <DIR> .
11/18/2020 09:46 AM <DIR> ..
11/18/2020 09:46 AM 0 BCJ-042102_1.jpg
11/18/2020 09:46 AM 0 BCJ-042102_2.jpg
11/18/2020 09:46 AM 0 BCJ-042102_3.jpg
11/18/2020 09:46 AM 0 BLN-021301_2.jpg
11/18/2020 09:46 AM 0 BLN-021301_3.jpg
11/18/2020 09:46 AM 0 DZPB-049001_1.jpg
11/18/2020 09:46 AM 0 DZPB-049001_2.jpg
11/18/2020 09:46 AM 0 DZPB-049001_4.jpg
8 File(s) 0 bytes
for /F %. in ('dir /b *.*') ; do mkdir %~n. && move /y %. %~n.
dir
Directory of C:\Users\Serguei\AppData\Local\Temp\xxx
1/18/2020 09:47 AM <DIR> .
1/18/2020 09:47 AM <DIR> ..
1/18/2020 09:47 AM <DIR> BCJ-042102_1
1/18/2020 09:47 AM <DIR> BCJ-042102_2
1/18/2020 09:47 AM <DIR> BCJ-042102_3
1/18/2020 09:47 AM <DIR> BLN-021301_2
1/18/2020 09:47 AM <DIR> BLN-021301_3
1/18/2020 09:47 AM <DIR> DZPB-049001_1
1/18/2020 09:47 AM <DIR> DZPB-049001_2
1/18/2020 09:47 AM <DIR> DZPB-049001_4
0 File(s) 0 bytes
C:\Users\Serguei\AppData\Local\Temp\xxx\BCJ-042102_1\BCJ-042102_1.jpg
C:\Users\Serguei\AppData\Local\Temp\xxx\BCJ-042102_2\BCJ-042102_2.jpg
C:\Users\Serguei\AppData\Local\Temp\xxx\BCJ-042102_3\BCJ-042102_3.jpg
C:\Users\Serguei\AppData\Local\Temp\xxx\BLN-021301_2\BLN-021301_2.jpg
C:\Users\Serguei\AppData\Local\Temp\xxx\BLN-021301_3\BLN-021301_3.jpg
C:\Users\Serguei\AppData\Local\Temp\xxx\DZPB-049001_1\DZPB-049001_1.jpg
C:\Users\Serguei\AppData\Local\Temp\xxx\DZPB-049001_2\DZPB-049001_2.jpg
C:\Users\Serguei\AppData\Local\Temp\xxx\DZPB-049001_4\DZPB-049001_4.jpg