[alpap]

допустим так, хоть и не коротко:

Код:

@echo off
set "s=fast slow error password error garbage test text blabla"
set "teg=error"
set "f_in=file.txt"

>"%f_in%" (for %%a in (%s%) do @echo %%a)
setlocal enabledelayedexpansion
 <"%f_in%" (for /f "delims=[]" %%a in ('find /n "%teg%"') do @set/a n+=1& set s!n!=%%a& set/a nd=s1+1,kd=s2-1)
 <"%f_in%" (for /f "delims=" %%a in ('for /l %%a in ^(%nd%,1,%kd%^) do @find /n /v ""^|find "[%%a]"') do @set "s=%%a"& set "var=!s:*]=!")
setlocal disabledelayedexpansion
echo %var%
pause
exit

это просто часть кода из моей утилиты, взял не разбирая, скорее всего можно упростить для вашей задачи, так как там надо было текст выводить между тегами, а у вас всего слово

кстати подобное PoSh сделает на ура и моргнуть не успеете.

[Patroklos]

Спасибо, пока правда ничего не понятно. Но я назову все переменные "говорящими" для меня названиями и за пару дней осилю.
Насчёт PoSh давно уже думаю но нет у меня пока условий дотошно учиться. Увы.

[alpap]

правда ничего не понятно »

принцип такой:
- вашу строку бьем по пробелу и в файл
- даем номера строкам
- выбираем номера строк с нужным тегом
- забираем строку с номером между найденных номеров выше и помещаем в переменную
ничего сложного, но букафф много

[alpap]

конкретно для вашего случая (в смысле поиск слова в предложении между двумя одинаковыми тегами) и без временного файла
(можно и еще короче, но пойдет и так, так понятнее, хотя смотря для кого)

Код:

@echo off
set "s=fast slow error password error garbage test text blabla"
set "teg=error"

setlocal enabledelayedexpansion
 for %%a in (%s%) do set /a n+=1& set $_!n!=%%a
 for /f "tokens=2 delims=_=" %%a in ('set $_^|find "%teg%"') do set /a sn=%%a-1
 for /f "tokens=2 delims==" %%a in ('set $_%sn%') do set "var=%%a"
 echo %var%
endlocal
pause

[megaloman]

вашу строку бьем по пробелу и в файл »

Без файла. Оформил в виде процедуры. Избежал setlocal enabledelayedexpansion
В пароле не должно быть пробелов

Код:

@Echo Off
cls

Set "Str=fast slow errOr    password       Error garbage test text blabla"
Set "Teg=error"

Call :Password "%Str%" "Pass"
Echo "%Pass%"

pause
GoTo :Eof

:Password
	Set /A nTeg=0
	:Begin
	Set /A nTeg+=1
	FOR /F "tokens=%nTeg% delims= " %%i IN ("%Str%") DO If /I %Teg%==%%i GoTo :Cont
	GoTo :Begin
	:Cont
	Set /A nTeg+=1
	FOR /F "tokens=%nTeg% delims= " %%i IN ("%Str%") DO Set "%~2=%%i"
GoTo :Eof

[alpap]

вот короче
вторичным тегом выступает = , можно назначить свой, если такой символ будет неуместен по тексту (в смысле присутствует уже)

Код:

@echo off
set "s=fast slow error password error garbage test text blabla"
set "teg=error"

cmd /v/c for %%v in ("!s: %teg% ==!") do for /f "tokens=2 delims==" %%a in ("%%~v") do echo %%a
pause

[Patroklos]

Круть! Спасибо. Чувствую я так и профессором "батаники" стану.
Я плашку решено пока не буду ставить так как мне возможно понадобятся подсказки.
Поставлю чуть позже. Спасибо.

[megaloman]

alpap, Краткость, несомненно, сестра таланта Но если текст будет вида "error password error garbage test text blabla" либо "fast slow error password error" Ваш батник отработает неверно.

Предлагаю длиннее, но с учетом этих имхо возможных случаев. Как и у Вас, батник работает в предположении, что между error и password не более одного пробела

Код:

@Echo Off
cls

Set "Str=fast slow error password error garbage test text blabla"

Call :Password "%Str%" "error" "Pass"

Echo "%Pass%"
Pause
GoTo :Eof

:Password
	SetLocal
	Set "Dlm=ё"
	Set "Str=a %~1 a" &Set "Teg= %~2 "
	Call Set "Str=%%Str:%Teg%=%Dlm%%%"   
	EndLocal &FOR /F "tokens=2,3 delims=%Dlm%" %%i IN ("%Str%") DO If Not "%%j"=="" (Set "%~3=%%i") Else (Set "%~3=")
GoTo :Eof

В качестве вспомогательного разделителя я здесь указал ё, естественно, можно указать любой допустимый.
Set "Dlm=ё"
Однако, реально я тестировал батник с символом, который на клавиатуре пользователь, не обременённый излишними знаниями, не введёт. Например, символ ASCII с десятичным кодом 177. Я не смог разместить на форуме батник с этим символом (ломается весь текст сообщения), поэтому вынужденно указал ё.
Опять же, имхо выделение пароля - не основная цель в неизвестном нам батнике, поэтому я это оформил в виде процедуры, чтобы не загромождать основной текст кода

Простите, если излагаю известное

Чтобы вставить в текст символ ASCII с определённым десятичным кодом, надо на цифровой клавиатуре, удерживая клавишу Alt, набрать нужный код

[alpap]

Но если текст будет ...»

естественно