Соединение = Новый COMОбъект("ADODB.Connection");
    СтрокаСоединения = "Driver={SQL Server};server=***;dataBase=***;uid=***;pwd=***";
    Попытка 
        СтрокаПодключения = СтрокаСоединения;
        Соединение.Open(СТрокаПодключения);
    Исключение
        Сообщить(ОписаниеОшибки());
        Возврат;
    КонецПопытки;
    Сообщить("Успешно");

    НаборЗаписей = Новый COMОбъект("ADODB.Recordset");
    ИмяТаблицыБазыДанных = "Categories";
    ВыборкаДанные = НаборЗаписей.Open(ИмяТаблицыБазыДанных, 
Соединение.ActiveConnection);
    ПолеТаблицы = Новый COMОбъект("ADODB.Field");
    Для Каждого ПолеТаблицы Из ВыборкаДанные Цикл
        Сообщить(ПолеТаблицы.Name + " " + ПолеТаблицы.Value);        
    КонецЦикла;
    НаборЗаписей.Close();    

{Форма.Форма(17)}: Ошибка при получении значения атрибута контекста (ActiveConnection): 
Произошла исключительная ситуация (ADODB.Connection): Arguments are of the wrong type, are out of acceptable range, 
or are in conflict with one another. ВыборкаДанные = НаборЗаписей.Open(ИмяТаблицыБазыДанных, Соединение.ActiveConnection);
по причине:
Произошла исключительная ситуация (ADODB.Connection): Arguments are of the wrong type, 
are out of acceptable range, or are in conflict with one another.

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

    СтрокаСоединения = "Driver={SQL Server};server=***;dataBase=***;uid=***;pwd=***";