Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Старожил


Сообщения: 415
Благодарности: 257

Профиль | Отправить PM | Цитировать


aggressor_, разумнее будет вместо копипаста всего кода, оформить функцией и вызывать уже её. Вам понятно из примера, как это делается?

Код: Выделить весь код
@Echo Off
SetLocal EnableDelayedExpansion


Call :Replace "C:\1\test\filiali1.txt" "C:\1\work\out.xml"
If Not %ErrorLevel%==0 (
	Echo ERROR: File "filiali1.txt" not found
	Explorer /root,"C:\1\test"
)

Call :Replace "C:\1\test_2\perevod1.txt" "C:\1\work\perevod.xml"
If Not %ErrorLevel%==0 (
	Echo ERROR: File "perevod1.txt" not found
	Explorer /root,"C:\1\test_2"
)

Echo All done
Pause
Exit


:Replace
If "%*"=="" Echo USAGE: Call :Replace "infile" "outfile"
If Not Exist "%~1" Exit /B 1
Echo ^<list^>^<item^>>"%~2"
For /F "usebackq delims=" %%A In ("%~1") Do (
	Set Var=%%A
	Set Var=!Var:^<=^<!
	Set Var=!Var:^>=^>!
	Echo !Var!>>"%~2"
)
Echo ^</list^>^</item^>>>"%~2"
Exit /B 0
Это сообщение посчитали полезным следующие участники:

Отправлено: 13:55, 29-05-2012 | #5