Подключение Com к MySQL в фоновом задании на Linux

Доброго дня!
Наша 1с-ка (Ут 10.3),серверный вариант,сервер 1с развернут на линуксе.
Есть необходимость подключаться регламентным заданием к базе MySQL и оттуда периодически забирать данные.
В тестовой обработке все нормально( ну еще бы,писалась и тестилась она на компутере под виндой). Но при выполнении данного кода в регл.задании выпадает ошибка "ошибка при вызове конструктора Com-объект". Как можно обойти это дело в наших условиях?
Спасибо

Процедура ЧтениеТасков() Экспорт
    Соединение = Новый COMОбъект("ADODB.Connection");
    ConnectionString = "DRIVER=MySQL ODBC 3.51 Driver;DATABASE=base;PWD=3r8y6c7v;SERVER=10.0.96.199;UID=1c;DataSource=sss;STMT=SET CHARACTER SET cp1251"; // это для MS SQL строка

    Попытка
        Соединение.Open(ConnectionString);
        Сообщить("Соединение осуществлено в "+ТекущаяДата());
    Исключение
        Возврат;
    КонецПопытки;

    ТекстЗапроса = "SELECT id,NAME,COMMENT,bugstatus_id, pin
    |FROM bugs
    |WHERE (bugstatus_id <>4 ) AND (ID>236)";
    НаборЗаписей = Новый COMОбъект("ADODB.RecordSet");
    НаборЗаписей.ActiveConnection = Соединение;
    НаборЗаписей.Open(ТекстЗапроса);

    Пока не НаборЗаписей.Eof() Цикл

        Задача = Задачи.ТехническиеЗадания.НайтиПоРеквизиту("IDCRM",НаборЗаписей.Fields("id").Value);
        Если НЕ ЗначениеЗаполнено(Задача) Тогда
            Описание =     НаборЗаписей.Fields("Comment").Value;
            мОписание  =Доработки.РазбитьСтроку(Описание,"&");
            нЗадача = Задачи.ТехническиеЗадания.СоздатьЗадачу();
            нЗадача.IDCRM = НаборЗаписей.Fields("id").Value;
            нЗадача.Контрагент = Справочники.Контрагенты.НайтиПоРеквизиту("ПинЗадач",НаборЗаписей.Fields("pin").Value);
            нЗадача.Важность = Перечисления.Важность.Средняя;
            нЗадача.Дата = ТекущаяДата();
            Если мОписание.количество()>1 Тогда
                нЗадача.Наименование =СтрЗаменить(мОписание[0],"$","");
                нЗадача.Описание = мОписание[1];
            Иначе
                нЗадача.Наименование =СтрЗаменить(мОписание[0],"$","");
                нЗадача.Описание = мОписание[0];
            КонецЕсли;
            нЗадача.Записать();


        КонецЕсли;
        НаборЗаписей.MoveNext();
    КонецЦикла;
    НаборЗаписей.Close();
    Соединение.Close();

КонецПроцедуры