[VokaMut]

Можно: Код: @echo off setlocal enableextensions enabledelayedexpansion for /f "usebackq delims=" %%i in ( `mshta.exe "javascript:var s=clipboardData.getData('text');if(s)new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(1).Write(s);close();" 1 ^| more` ) do if not defined sClipboard set sClipboard=%%i if defined sClipboard echo [%sClipboard%] endlocal exit /b 0 »

Спасибо, но я пошел по более простому решению с помощью GetChip.exe:

Код:

Chcp 1251
set SrcPath=D:\1
set DestPath=D:\2

getclip.exe>1.txt ::записываем текст из буфера в файл
Set file=1.txt 
For /F "usebackq tokens=* delims=" %%i In ("%file%") Do Set body=%%i ::берем переменную из файла

"C:\PROGRA~1\WinRAR\rar.exe" a -m5 -s -y -ep1 -r -x*"123.txt" "%DestPath%\%body%.rar" "%SrcPath%\*.*"