Tol!k
|
 Posted: Wed Aug 17, 2011 22:26 Post subject: |
 |
|
| Flasher wrote: | | Тогда вместо %F откусывай имена последних компонентов в заданных в %L путях. |
| Code: | @echo off &setlocal enableextensions &chcp 1251 >nul
rem Создать в целевой папке ссылки с сохранением путей
rem для одноимённых с выделенными файлов из выделенных папок
rem Пример параметров для TC: "%L" "%T"
set "msk=%~1" &set "trg=%~2"
for /f "delims=" %%l in ('findstr /ec:\ "%msk%"') do call :p "%%l" "%%~dpl."
goto :eof
:p
for /f "delims=" %%f in (
'for /f "delims=" %%a in ^('findstr /vec:\ "%msk%"'^) do @dir /a-d/b/s "%~1%%~nxa" 2^>nul'
) do call :f "%%f" %2
goto :eof
:f
set "p=%~dp1"
call set "p=%%p:%~dp2=%%"
if not exist "%trg%\%p%" md "%trg%\%p%"
fsutil hardlink create "%trg%\%p%%~nx1" %1
goto :eof
|
Кажется нашёл ошибку в предыдущем батнике |
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
