УФ. скопировать в буфер обмена

1С v8

, ,

15.04.13

✎

14:15

нагуглилось два варианта:
ВариантРаз:
Элементы.ПолеHTMLДокумента.Документ.parentWindow.ClipboardData.SetData("Text", "Йо!");
ВариантДва:


 
WScript=Новый COMОбъект("WScript.Shell");
 
clipboardHelper=WScript.CreateObject("ClipboardHelper.Clipboard");
 
clipboardHelper.SetClipboardText("Йо!");

первый вариант работает только при видимости ПоляХТМЛ, второй ругается, что не знает CreateObject. вопрос: как скопировать произвольный текст в буфер обмена?

1 Wobland

15.04.13

✎

14:26

и третий работающий, но работающий "через назад" вариант:
ie=Новый COMОбъект("internetexplorer.application");
ie.navigate("about:blank");
Док=ie.document;
Док.ParentWindow.ClipboardData.clearData();
стр="Готово";
Док.ParentWindow.ClipboardData.SetData("Text",стр);

что делать?

2 Dethmont

15.04.13

✎

15:02

Функция ПолучитьТекстБуфераОбмена() Экспорт
#Если Клиент Тогда
Объект = Новый COMОбъект("htmlfile");
Возврат Объект.ParentWindow.ClipboardData.Getdata("Text");
#КонецЕсли
КонецФункции

Функция УстановитьТекстВБуферОбмена(Текст) Экспорт
#Если Клиент Тогда
Объект = Новый COMОбъект("htmlfile");
Объект.ParentWindow.ClipboardData.Setdata("Text", Текст);
Возврат Текст;
#КонецЕсли
КонецФункции

Отсюда
http://help1c.com/faq/view/705.html

3 Wobland

15.04.13

✎

17:33

(2) спасибо, опробую, но уже завтра

4 Wobland

16.04.13

✎

06:21

да, с htmlfile взлетело, спасибо

5 Dethmont

16.04.13