[Foreigner]

Код:

@echo off
setlocal

for /f "tokens=1 delims=:" %%i in (' findstr /n /c:"---" text.txt ') do (

    if not defined start ( set /a "start=%%i+1" ) else ( set /a "stop=%%i-1" )

)

1>1.tmp more +%start% text.txt
1>2.tmp more +%stop% text.txt

1>out.txt (

    findstr /v /b /e /g:2.tmp 1.tmp
    for /f "tokens=2 delims=:" %%i in (1.tmp) do findstr "%%i" text2.txt
)

for /f "tokens=2 delims=:" %%i in ('findstr "e-mail" 1.tmp') do set "mail=%%i"

:: Как отправлять решайте сами, у меня нет консольной отправлялки почты

echo sending file out.txt to %mail%

:: Переносим в "архив". Здесь не все ясно, поэтому echo

for %%i in (text.txt out.txt) do echo move %%i C:\Archive

del *.tmp

ЗЫ. В text2.txt название страховой компании должно быть ТОЛЬКО на одной строке и все описание там же.

ЗЫЫ. Батник не лучший вариант для обработки текста, особенно кириллицы.

[JackL]

Foreigner, Спасибо.

С отправкой на майл все получилось. Спасибо. Но вот из файла text2.txt в итоговый файл out.txt подставляется всегда первая строка с описанием страховой из списка. А надо, что бы имя страховой в text.txt совпадало с добавляемым описанием из text2.txt

Еще раз Спасибо, Foreigner. Просьба помочь добить задачу.

[Foreigner]

JackL, Попробуйте изменить:

Код:

...

1>1.tmp more +%start% text.txt
1>2.tmp more +%stop% text.txt

for /f "tokens=2 delims=:" %%i in ('find "Страховая компания" 1.tmp') do set "ins=%%i"

1>out.txt (

    findstr /v /b /e /g:2.tmp 1.tmp
    for /f "tokens=1,2 delims=#" %%i in (text2.txt) do if " %%i"=="%ins%" echo %%j
      
)

...

При условии, что формат text2.txt будет:

Код:

Ресо#Езжайте на Нагорную и ждите оценщика
Оранта#Основана в 1905 году. Бла Бла
Росгорстрах#Что-то там про компанию
Чижик-Пыжик#Где ты был?

Т.е. разделитель "#" в строке "insurance company#description"

Батник должен быть в кодировке windows-1251

[Georgio]

3) Отправка получившегося файла out.txt, как текста письма, по адресу указанному в нутрии файла text.txt или out.txt “e-mail: 3197087@mail.ru” 4) Перенесение файлов text.txt и out.txt в архив. »

-- с зтими пунктами задания нужно разбираться "чисто конкретно" (да и особого желания нет).



А по пунктам 1) и 2) вот такое решение:

Код:

@ECHO OFF>out.txt

SETLOCAL ENABLEDELAYEDEXPANSION

SET Number_of_Skipping_Strings_from_the_Beginning=9

SET Number_of_Skipping_Strings_from_the_End=6

FOR /F "tokens=1* delims=:" %%I IN ('FINDSTR /N /R . text.txt^&^&ECHO.^&^&FINDSTR /N /R /V . text.txt') DO IF DEFINED Number_of_Strings (IF %%I GTR !Number_of_Strings! SET Number_of_Strings=%%I) ELSE SET Number_of_Strings=%%I

SET /A VAR1=Number_of_Strings-Number_of_Skipping_Strings_from_the_End

FOR /L %%I IN (1,1,!Number_of_Strings!) DO FOR /F "tokens=1* delims=:" %%J IN ('FINDSTR /N /R . text.txt^&^&ECHO.^&^&FINDSTR /N /R /V . text.txt') DO IF %%I==%%J IF %%I GTR %Number_of_Skipping_Strings_from_the_Beginning% IF %%I LEQ %VAR1% SET VAR2=%%K&IF DEFINED VAR2 (SET VAR3=!VAR2: =!&IF DEFINED VAR3 (ECHO %%K>>out.txt) ELSE ECHO.>>out.txt) ELSE ECHO.>>out.txt

FOR /F "tokens=1,2* delims=: " %%I IN (text.txt) DO IF "%%I %%J"=="Страховая компания" FOR /F "tokens=1* delims=." %%L IN (text2.txt) DO IF %%L==%%K ECHO %%L.%%M>>out.txt

Скрипт "делает обрезание" текста на заданное количество строк как сверху, так и снизу. В коде заданы переменные согласно шаблону, но можно редактировать. При подсчёте строк учитываются все строки, в том числе пустые и заполненные одним или более пробелами. При репликации оставшейся части текста строки с одними пробелами эаменяются на пустые строки. Пустые строки сохраняются. Временные файлы не применяются. Извините, что в коде длинные строки, поленился переделать.

[Georgio]

Этот скрипт делает то же самое, что и предыдущий, только используется FIND вместо FINDSTR. В результате одним циклом меньше.

Код:

@ECHO OFF>out.txt

SETLOCAL ENABLEDELAYEDEXPANSION

SET Number_of_Skipping_Strings_from_the_Beginning=9

SET Number_of_Skipping_Strings_from_the_End=6

FOR /F %%I IN ('FIND /C /V ""^<text.txt') DO SET Number_of_Strings=%%I

SET /A VAR1=Number_of_Strings-Number_of_Skipping_Strings_from_the_End

FOR /F "tokens=1* delims=[]" %%I IN ('FIND /N /V ""^<text.txt') DO (
 IF %%I GTR %Number_of_Skipping_Strings_from_the_Beginning% (
  IF %%I LEQ %VAR1% (
   SET VAR2=%%J
   IF DEFINED VAR2 (
    SET VAR3=!VAR2: =!
    IF DEFINED VAR3 (
     ECHO %%J>>out.txt
  ) ELSE (
     ECHO.>>out.txt
)) ELSE (
    ECHO.>>out.txt
))))

FOR /F "tokens=1,2* delims=: " %%I IN (text.txt) DO (
 IF "%%I %%J"=="Страховая компания" (
  FOR /F "tokens=1* delims=." %%L IN (text2.txt) DO (
   IF %%L==%%K ECHO %%L.%%M>>out.txt
)))

[JackL]

Огромное Спасибо, Georgio и Foreigner! Все получилось.