[deepred]

gora,

спасибо, да так действительно попроще, а вот "нововведение" про чтение с 25-го символа я незаметил...

[gora]

"нововведение" про чтение с 25-го символа я незаметил »

Я взял прикрепленный файл, а в нем вторая строка такова:

Код:

Отделы отчетный N  8456/2060

[deepred]

gora,

да-да, но опять таки - можно было ориентироваться на < "tokens=2 delims=/" >

[Seryoga204]

Всем спасибо! Все работает отлично.

[Seryoga204]

Код:

Echo on & Chcp 1251  
Setlocal EnabledelayedExpansion  
Set "$SRS=F:\probe\переименование\001\" & rem папка источник  
Set "$DST=F:\probe\переименование\002\" & rem папка приемник    
Cd %$SRS%  For /f %%a in ('Dir /b %$SRS%') Do call :RNCOPY "%%a"  
goto :EOF    
:RNCOPY  
For /f "skip=1 tokens=*" %%b in (%$SRS%%~1) Do ( 
 	Set $nm=%%b
  	Set $nm=!$nm:~24,4!
  	Copy "%$SRS%%~1" "%$DST%!$nm!%~x1"  	
goto :Eof  )

Подскажите пожалуйста как сделать чтобы название файла бралось не с одной строки, а с нескольких. Пример текста в файле:

Код:

               МЕМОРИАЛЬНИЙ ОРДЕР N-R=100211
                 от 20 июня 2010 г.                    




000                                        352200000

Надо чтобы имя получилось "от 20 июня 2010 г._Dt3522_100211.txt", т.е. вторая строка с 17символа(18)&"_Dt"&шестая строка c 48 символа(4)&"_"&первая строка с 39 символа(6).

[gora]

Seryoga204, сделано по, предоставленному Вами, образцу файла

Код:

@Echo Off & Chcp 1251>Nul
Setlocal EnabledelayedExpansion
Set "$SRS=F:\probe\переименование\001\" & rem папка источник
Set "$DST=F:\probe\переименование\002\" & rem папка приемник

Cd %$SRS%
For /f %%a in ('Dir /b %$SRS%') Do call :RNCOPY "%%a"
goto :EOF

:RNCOPY
Set cnt=0
For /f "tokens=* delims=" %%b in (%$SRS%%~1) Do (
	Set /a cnt+=1
	Set $nm=%%b
	If !cnt!==1 Set $lin!cnt!=!$nm:~38,6!
	If !cnt!==2 Set $lin!cnt!=!$nm:~17,18!
	If !cnt!==3 Set $lin!cnt!=!$nm:~43,4!
)
Copy "%$SRS%%~1" "%$DST%!$lin2!_Dt!$lin3!_!$lin1!%~x1">Nul
goto :Eof

[Seryoga204]

gora,
Спасибо большое!

[AlexVong]

Подскажите пожалуйста, использую код

Код:

Echo on & Chcp 1251
Setlocal EnabledelayedExpansion
Set "$SRS=F:\probe\переименование\001\" & rem папка источник
Set "$DST=F:\probe\переименование\002\" & rem папка приемник

Cd %$SRS%
For /f %%a in ('Dir /b %$SRS%') Do call :RNCOPY "%%a"
goto :EOF

:RNCOPY
For /f "skip=1 tokens=*" %%b in (%$SRS%%~1) Do (
	Set $nm=%%b
	Set $nm=!$nm:~24,10!
	Copy "%$SRS%%~1" "%$DST%!$nm!%~x1"
	goto :Eof
)

Под отбор попадает как раз фрагмент строки с датой(типа: 01/01/2011 ), но так как имеет место символ "/", батник не может присвоить данное название файлу, как поступить в таком случае? Чтобы имя файла было 2011-01-01.txt Подскажите пожалуйста.

[Iska]

AlexVong, попробовать дополнительно воспользоваться заменой «set VarY=%VarX:/=-%»?!

Подстановка переменной среды может быть расширена следующим образом: Код: %PATH:str1=str2% расширит действие переменной среды PATH, заменяя каждое вхождение "str1" в расширенном результате на "str2". "str2" может быть пустой строкой для эффективного удаления вхождений "str1" из расширенного вывода. "str1" может начинаться со звездочки, и в этом случае это будет соответствовать любому началу расширенного вывода до первого вхождения оставшейся части "str1".

Пример:

Код:

@echo off
setlocal

set sName=01/01/2011
set sName=%sName:/=-%

echo %sName%

endlocal
exit /b 0

[AlexVong]

А как сделать чтобы это имя выводилось на экран? Типа "скопирован файл за sName"