If ЗагрузитьВнешнююКомпоненту("1cpp.dll")=0 Then
   DoMessageBox("Компонента 1с++ не найдена");
EndIf;
         
DB=СоздатьОбъект("ODBCDatabase");

DB.Соединение("Provider=MSDAORA.1;Server=192.168.0.95; dbq=almico; Uid=sys; Pwd=qqq;");

Если DB.ЕстьСоединение() = 1 Тогда
//Сообщить("Работает!!!");
Иначе
Сообщить("Не работает!", "!!!");
Сообщить(DB.ПолучитьОписаниеОшибки());
Возврат;
КонецЕсли;


=========================================================

Сообщение выводит следующее:

Не работает!
State IM002, native 0, message [Microsoft][Диспетчер драйверов ODBC] Источник данных не найден и не указан драйвер, используемый по умолчанию.

Куда копать?

поставить драйвер

На сервак или куда?

на комп откуда соединеяшся

ок, вот код подключения с этого же компа только под 1с8

Соединение = Новый COMОбъект("ADODB.Connection");
СтрокаПодключения = "Provider=MSDAORA.1;Data source=almico;Persist Security Info=True;Password=qqq;User ID=sys";
Соединение.ConnectionString=СтрокаПодключения;
Соединение.Provider =  "MSDAORA.1";
Соединение.Open();

соединяется с базой без проблем

(4) точно также ado и в v77 работает

Соединение = создатьобъект("ADODB.Connection");
далее как в 4

как в 0 не получиться потому что MSDAORA скорее всего
не odbc провайдер.
Если нужно (0) то ставь odbc драйвер и все получится.