Advertisement
Guest User

Untitled

a guest
Jun 26th, 2019
80
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.76 KB | None | 0 0
  1. @echo off
  2. setlocal
  3.  
  4. set "basename=."
  5. for /F "tokens=1* delims=." %%a in ('dir /B /A-D ^| sort /R') do (
  6. set "filename=%%a"
  7. setlocal EnableDelayedExpansion
  8. for /F "delims=" %%c in ("!basename!") do if "!filename:%%c=!" equ "!filename!" (
  9. set "basename=!filename:~0,11!"
  10. if not exist "!filename:~0,11!" md "!basename!"
  11. )
  12. move "!filename!.%%b" "!basename!"
  13. for /F "delims=" %%c in ("!basename!") do (
  14. endlocal
  15. set "basename=%%c
  16. )
  17. )
  18.  
  19. @echo off
  20. for /f "delims=" %%F in (
  21. 'Dir /b *.dwg *.jpg *.pdf *.slddrw *.sldprt *.sldasm *.STEP^|findstr "^[X]-[0-9][0-9][0-9][0-9][0-9]-[0-9][0-9][0-9]" '
  22. ) do call :subr "%%F"
  23. exit /b
  24.  
  25. :subr
  26. set "file=%~n1"
  27. set "fold=%file:~0,11%"
  28. if not exist "%fold%*" md "%fold%"
  29. move %1 "%fold%"
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement