Использование ActiveX в 1С 8.x

Режим = РежимДиалогаВыбораФайла.Открытие; 
ДиалогФыбораФайла = Новый ДиалогВыбораФайла(Режим); 
ДиалогФыбораФайла.Фильтр = "Все файлы (все)|*.*"; 
ДиалогФыбораФайла.Заголовок = "Выберите медиа файл"; 
Если ДиалогФыбораФайла.Выбрать() Тогда 
	ПутьКМедиаФайлу = ДиалогФыбораФайла.ПолноеИмяФайла; 
	// В зависимости от варианта объекта запись полного пути к файлу 
	// производится либо в свойство FileName, либо в свойство URL. 
	Попытка 
		ЭлементыФормы.WMP.FileName = ПутьКМедиаФайлу; 
	Исключение 
		ЭлементыФормы.WMP.URL = ПутьКМедиаФайлу; 
	КонецПопытки; 
КонецЕсли;

Договор = ПолучитьМакет("Договор"); 
// Получить объект из макета. 
MSWord = Договор.Получить(); 
НаименованиеКонтрагента = "ООО Торгуем всем"; 
Попытка 
	Документ = MSWord.Application.Documents(1); 
	Документ.Activate(); 
	// Получить объект, который будем использовать для поиска и замены. 
	Замена = Документ.Content.Find; 
	// Заменить заранее определенные ключевые конструкции на требуемый текст. 
	Замена.Execute("", Ложь, Истина, Ложь, , , 
	Истина, , Ложь, НаименованиеКонтрагента); 
	// Далее аналогично для остальных ключевых конструкций. 
	// Делаем видимым приложение и активизируем его. 
	MSWord.Application.Visible = Истина; 
	MSWord.Activate(); 
Исключение 
	// Если произойдет ошибка выводятся данные об ошибке и объект закрывается. 
	Сообщить(ОписаниеОшибки()); 
	MSWord.Application.Quit(); 
КонецПопытки;