Подскажите что я делаю не так.

   ПрогИД = "AddIn.Scanner";
   ПодключитьВнешнююКомпоненту(ПрогИД);
   
   Драйвер =  Новый(ПрогИД);
   Драйвер.БитДанных = 8;
   Драйвер.Порт = 5;
   Драйвер.Скорость = 9600;
   Драйвер.СтопБит = 0;
   Драйвер.СтопСимвол = 13;

   Драйвер.ИмяСобытия = "BarCode";

   Если Драйвер.Занять(1)=0 Тогда
       
       Драйвер.УстройствоВключено = 1;
       Драйвер.ПосылкаДанных = 1;
       Драйвер.ОчиститьВход();
       Драйвер.ОчиститьВыход();
       
   КонецЕсли;


В условие не заходит. Хотя смотрю стандартное подключение сканера там все тоже самое и функция Занять() возвращает 0, а у меня ни как.

Заранее огромное спасибо.

Заработало!!!! Оказывается в начале надо еще

Драйвер.Open("");

вы прослушали утренний монолог Дионисиуса