Цитата Ilmira:
|
А можно написать исключения, когда файл повторяет название добавлять "_"в конце »
|
Код:
@Echo Off
cls
For %%f In (*.*) Do Call :MyRen "%%f"
pause
Exit /B
:MyRen
Set "Name=%~n1"
Set "Name=%Name: =%"
Set "Name=%Name:!=%"
Set "Name=%Name:,=%"
If /I "%Name%"=="%~n1" Exit /B 0
If Not Exist "%Name%%~x1" (Ren %1 "%Name%%~x1" &Exit /B 0)
Set /A i=0
:Begin
Set /A i+=1
If Exist "%Name%_%i%%~x1" GoTo :Begin
Ren %1 "%Name%_%i%%~x1"
Exit /B 0
Добавляет _1 _2 ... в конце имени перед расширением при совпадении имен
Код:
1aqwertyuiop.txt
1aqwertyuiop_1.txt
1aqwertyuiop_2.txt
1bqwertyuiop.txt
1bqwertyuiop_1.txt
1bqwertyuiop_2.txt
1qwertyuiop.txt
1qwertyuiop_1.txt
1qwertyuiop_2.txt
2aqwertyuiop.txt
2aqwertyuiop_1.txt
2aqwertyuiop_2.txt
2bqwertyuiop.txt
2bqwertyuiop_1.txt
2bqwertyuiop_2.txt
2qwertyuiop.txt
2qwertyuiop_1.txt
2qwertyuiop_2.txt
3aqwertyuiop.txt
3aqwertyuiop_1.txt
3aqwertyuiop_2.txt
3bqwertyuiop.txt
3bqwertyuiop_1.txt
3bqwertyuiop_2.txt
3qwertyuiop.txt
3qwertyuiop_1.txt
3qwertyuiop_2.txt
hgfhjkldfghj.ggg
Цитата DJ Mogarych:
|
Лучше добавлять что-то уникальное на каждый момент переименования, например, мгновения времени. »
|
ИМХО, при таком подходе получим плохо читаемые имена файлов.
