Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)
-   -   [решено] Переименовать файлы по маске (http://forum.oszone.net/showthread.php?t=317106)

pageYK@fb 24-07-2016 11:56 2653658

Переименовать файлы по маске
 
Есть файлы с маской YYYYMMDDрандомнаячисловаяпоследовательность.jpg , нужно переименовать все файлы в YYYY-MM-DD-рандомнаячисловаяпоследовательность.jpg . (Т.е. вставить "-")

megaloman 24-07-2016 18:41 2653767

Код:

@echo off
SetLocal EnableDelayedExpansion

Set "Mask=*.jpg"
Set "Mask=Z:\Tralala\*.jpg"

for %%i in ("%Mask%") do (
        Set "Name=%%~nxi"
        Set "YYYY=!Name:~0,4!"
        Set "MM=!Name:~4,2!"
        Set "DD=!Name:~6,2!"
        Set "Name=!Name:~8,9999!"
        Set /A A=!YYYY!!MM!!DD!*1 2>nul
        If "!A!"=="!YYYY!!MM!!DD!" (
                If !YYYY! GTR 1900 If !MM! LEQ 12 If !DD! LEQ 31 Ren "%%i" "!YYYY!-!MM!-!DD!-!Name!"
        )
)



Время: 06:04.

Время: 06:04.
© OSzone.net 2001-