Как загрузить внешнюю компоненту?

 Попытка 
	ЗагрузитьВнешнююКомпоненту("scanopos.dll") 
Исключение 
	Сообщить("Ошибка загрузки внешней компоненты!"); 
КонецПопытки; 

Попытка 
	// Получить объект компоненты. 
	Объект = Новый("AddIn.Scanner"); 

Исключение 
	Сообщить("Не удалось создать объект внешней компоненты"); 
КонецПопытки;    

 //в качестве аргумента "Значение" в функцию передаётся имя файла внешней компоненты
//функция возвращает "1", если загрузка выполнена успешно, или "0", если внешнюю компоненту загрузить не получилось
Функция гВнешняяКомпонента_Загрузить(Значение) Экспорт
     Состояние("Загрузка компоненты: "+Значение);
     Если ЗагрузитьВнешнююКомпоненту(Значение)=1 Тогда
          Возврат(1);
     Иначе
          Сообщить("Ошибка при загрузке компоненты: "+Значение,"!");
          Возврат(0);
     КонецЕсли;
КонецФункции

//этот код можно разместить в локальном модуле, в котором требуется использовать внешнюю компоненту
Если гВнешняяКомпонента_Загрузить("v7plus.dll")=0 Тогда
     Возврат;
КонецЕсли;

 имяф="e:\Events\Events.dll";
    Если фс.СуществуетФайл(имяф)=0 Тогда
        Сообщить("Файл не найден: "+имяф,"!"); 
    КонецЕсли;    
    Если ЗагрузитьВнешнююКомпоненту(имяф)=0 Тогда
        Сообщить("Ошибка загрузки внешней компоненты: "+имяф);
    КонецЕсли;    
    vk=СоздатьОбъект("Addin.Events");