Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

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

Ветеран


Contributor


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

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


Как вариант (если после равно в строке всякие спкцсимволы - не годится)
Код: Выделить весь код
@Echo Off
cls

Set "FileIn=Z:\Box_In\In File.txt"
Set "Key=let"

FOR /F "usebackq tokens=1,2,3 delims==; " %%i IN (`more "%FileIn%" 2^>nul`) DO (
	Call :Ident "lasr_port" "%%i" "%%j" "%%k"
	Call :Ident "lasr_host" "%%i" "%%j" "%%k"

rem Остальные три строки вставил как пример возможности
	Call :Ident "vaRepLib" "%%i" "%%j" "%%k"
	Call :Ident "lasr_engine" "%%i" "%%j" "%%k"
	Call :Ident "lasr_tag" "%%i" "%%j" "%%k"
)
Echo %lasr_port%
Echo %lasr_host%

Echo %vaRepLib%
Echo %lasr_engine%
Echo %lasr_tag%

pause
GoTo :Eof

:Ident
	If /I %2=="%Key%" If /I %1==%3 Set "%~1=%~4"
GoTo :Eof

-------
Даже самая сложная проблема обязательно имеет простое, лёгкое для понимания, неправильное решение. Каждое решение плодит новые проблемы.


Последний раз редактировалось megaloman, 27-07-2017 в 11:00.

Это сообщение посчитали полезным следующие участники:

Отправлено: 17:22, 26-07-2017 | #30