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

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

Ветеран


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

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


rosalin, нашёл и устранил проблему. Привожу отредактированный код для обоих пакетных файлов.

Код: Выделить весь код
@echo off
setlocal enabledelayedexpansion
for %%i in (*.msg) do (
 for /f "delims=" %%j in ('
  findstr /irc:"for <.*@" "%%~i"^| findstr /n "^"^| findstr /b 1:
 ') do (
  set "string=%%j"
  set "string=!string:*for <=!"
  for /f "delims=@" %%k in ("!string!") do (
   md "%%k" 2>nul
   copy "%%~i" "%%k">nul
  )
 )
)
endlocal
exit /b
Код: Выделить весь код
@echo off
call:# "adm" "info" "ivanov" "petrov" "sidorov"
exit /b

:#
for %%i in (*.msg) do (
 for /f "delims=" %%j in ('
  findstr /irc:"for <.*@" "%%~i"^| findstr /n "^"^| findstr /b 1:
 ') do (
  for %%k in (%*) do call:## "%%j" %%k "%%~i"
 )
)
exit /b

:##
echo %1| >nul (
findstr /ilc:"for <%~2@"&& (
md %2 2>&1
copy %3 %2
))
exit /b
Это сообщение посчитали полезным следующие участники:

Отправлено: 08:16, 05-05-2014 | #8