Форум программистов [Powered by Invision Power Board]

Код

Connection = Новый COMОбъект("ADODB.Connection");


Сервер = "";
МестоНахождениеБД = "F:\1C_Conect\AVERS.FDB";
ПараметрыПодключения = "auto_commit=True;ctype=win1251";
ИмяПользователя = "SYSDBA";
ПарольПользователя = "masterkey";

стрПодключения = "data source=" + Сервер + ":" + МестоНахождениеБД + ";" + ПараметрыПодключения + ";user ID=" 
+  ИмяПользователя + ";password=" + ПарольПользователя+"auto_commit = true";


Connection.Provider = "LCPI.IBProvider.3.Free";
Connection.ConnectionString =  стрПодключения;


 Connection.ConnectionTimeOut     = 60;
    Connection.CommandTimeout        = 60;
    Connection.CursorLocation         = 3;

попытка
Connection.Open();
Сообщить ("Соединение установленно" );
исключение
Сообщить ("Проблемы с подключением" );
КонецПопытки;