[ANDYru]

ну чтож и я поделюсь полезняшкой

создаем файл PasteClipBoard.bat c содержимым :

Код:

@echo off

if {%1}=={} @echo Syntax: PasteClipBoard content&goto :EOF

if exist "%TEMP%\PasteClipBoard.vbs" goto doit

@echo Dim objArgs>"%TEMP%\PasteClipBoard.vbs"

@echo Set objArgs = Wscript.Arguments>>"%TEMP%\PasteClipBoard.vbs"

@echo Content = objArgs(0)>>"%TEMP%\PasteClipBoard.vbs"

@echo Set objIE = CreateObject("InternetExplorer.Application")>>"%TEMP%\PasteClipBoard.vbs"

@echo objIE.Navigate("about:blank")>>"%TEMP%\PasteClipBoard.vbs"

@echo objIE.document.parentwindow.clipboardData.SetData "text", Content>>"%TEMP%\PasteClipBoard.vbs"

@echo objIE.Quit>>"%TEMP%\PasteClipBoard.vbs"

:doit

cscript //nologo "%TEMP%\PasteClipBoard.vbs" %1

запускаем PasteClipBoard.bat "Этот текст попадёт в буфер обмена"

вот собственно иногда просто не заменимая вещь для автоустановок , когда необходимо учитывать раскладку клавы по умолч., капслук, и возможное наличие пунтосвитчера - а этим приёмом эти устовия безразлисны