огромное спасибо, все работает как швейцарские часики
p.s. сделал только пару изменений, ну и дописал команду распаковки архива
1. подготовка структуры директорий, не знаю грамотно я это или безграмотно сделал, слизал с кода ниже, главное работает большего и не надо
Код:
rem Подготавливаем структуру директорий
If Not Exist "%GetPath%" MD "%GetPath%"
For /F "tokens=1,2,3 delims=." %%A In ("%Date%") Do (
If Not Exist "%ReadPath%\%%C.%%B.%%A" MD "%ReadPath%\%%C.%%B.%%A
2. файл мне переименовывать не нужно было, а нужно было перемещать в папку с сегодняшней датой
Код:
rem Переименовываем обработанный файл, чтобы исключить повторное прочтение
rem Если в системе установлен другой формат даты - исправить.
For /F "tokens=1,2,3 delims=." %%A In ("%Date%") Do (
Move "%ReadPath%\%NFOName%" "%ReadPath%\%%C.%%B.%%A\%NFOName%"
3. ну и команда arj
Код:
c:\arj\ARJ32.EXE e C:\BNK\IZM\*.arj C:\BNK\IZM\
и красота, все работает именно так как мне это и нужно, огромное человеческое спасибо
