Раскаковка файлов с архива по маске и поиск в них текста

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)

Раскаковка файлов с архива по маске и поиск в них текста

Помогите пожалуйста решить задачу.

Есть папка с множеством архивов.
Нужно с всех этих архивов распаковать все файлы по маске name*.txt в отдельную папку
После распаковки искать в каждом из файлов текст "code".
Если текст не найден в файле тогда удалять этот файл а те файлы в которых текст найден оставлять в папке

На выходе нужно чтоб остались только файлы в которых есть искомый текст.

Заранее благодарю за помощь!

Так "помогите решить" или "сделайте всё за меня"?
Что конкретно у вас вызывает затруднения?

Код:

@Echo Off

cls

        Set "ArcIn=Z:\Box_In\*.rar

        Set "BoxOut=Z:\Box_Out\UnARC"

        Set "MaskOut=я19*.bat"

        Set "Word=chcp 1251"



        If Not Exist "%ArcIn%" (Echo Files "%ArcIn%" not found &Pause &Exit /B 2)

        If Not Exist "%BoxOut%\*.*" 2>nul Md "%BoxOut%"

        2>nul Md "%BoxOut%\tmp"

        Pushd "%BoxOut%\tmp" ||(Echo Folder "%BoxOut%" not found or not accessible &Pause &Exit /B 2)



        "C:\Program Files\WinRAR\WinRAR.exe" e -y "%ArcIn%" "%MaskOut%"

        Popd



        For /F "usebackq delims=" %%a In (`2^>nul FINDSTR /I /M /L /C:"%Word%" "%BoxOut%\tmp\%MaskOut%"`) Do (

                >nul Move /Y "%%a" "%BoxOut%\"

        )

        

        Rd /S /Q "%BoxOut%\tmp"

Pause

Exit /B