ODBCParamValue(Name: String): Variant;
Name. Наименование параметра.
Свойство ODBCParamValue определяет значение для параметра с указанным наименованием.
Наименования параметров можно получить в документации по ODBC драйверу, с помощью которого осуществляется подключение.
В операционной системе должен быть установлен ODBC драйвер для Microsoft SQL Server. В сети имеется сервер с наименованием «MSSQLServer», на сервере создана схема «DataRepository».
Добавьте ссылку на системную сборку Dal.
Sub UserProc;
Var
Driver: IDalDriver;
ConDesc: IDalConnectionDescriptor;
Params: IDalConnectionDescriptorParams;
Con: IDalConnection;
ParamsODBC: IDalODBCConnectionDescriptor;
Begin
// Драйвер для подключения
Driver := New DalMsSql2012ODBCDriver.Create As IDalDriver;
// Описание подключения
ConDesc := Driver.CreateDescriptor;
Params := ConDesc.Params;
// Настройка параметров подключения
Params.Find("Host BSTR").Value := "MSSQLServer";
Params.Find("Database").Value := "DataRepository";
Params.Find("User Name").Value := "User";
Params.Find("Password").Value := "Password";
// Дополнительные параметры подключения
ParamsODBC := ConDesc as IDalODBCConnectionDescriptor;
ParamsODBC.ODBCParamValue("MultiSubnetFailover") := "Yes";
ParamsODBC.ODBCParamValue("ApplicationIntent") := "ReadOnly";
Con := ConDesc.CreateConnection;
Con.Open;
If Con.IsDisconnected Then
Debug.WriteLine("Соединение отсутствует.");
Else
Debug.WriteLine("Соединение установлено.");
End If;
End Sub UserProc;
При выполнении примера будет создано новое подключение к указанному серверу. При подключении используется ODBC драйвер с заданием дополнительных параметров подключения. Результат подключения будет выведен в консоль среды разработки.
См. также: