ISecurityPackage.CreateLogonData

Синтаксис

CreateLogonData(DriverName: String): ISecurityPackageLogonData;

Параметры

DriverName. Идентификатор драйвера БД.

Описание

Метод CreateLogonData возвращает объект, содержащий свойства параметров модуля безопасности.

Комментарии

Список идентификаторов, которые могут использоваться в качестве значения параметра DriverName, представлен в подразделе «Поддерживаемы СУБД > Сводный список идентификаторов». Для проверки, поддерживается ли выбранный драйвер, используйте метод ISecurityPackage.IsCompatibleDriver.

Пример

Sub Main;

Var

Package: ISecurityPackage;

MSSQLSPLD: IPrimaryMsSqlSPLD;

Cred: IPasswordCredentials;

Connection: ISecurityConnection;

ColCur: IDalColumns;

Field: IDalCursorField;

Begin

Package := New StandardSecurityPackage.Create;

MSSQLSPLD := Package.CreateLogonData("MSSQL2008") As IPrimaryMsSqlSPLD;

MSSQLSPLD.Database := "Test_Schema_MSSQL";

MSSQLSPLD.Server := "Test_MSSQL";

Cred := Package.CreateCredentials(AuthenticationMode.Password) As IPasswordCredentials;

Cred.UserName := "TestUser";

Cred.Password := "TestUser";

Connection := Package.PerformLogonRoleO(1, MSSQLSPLD, Cred, 0, 0);

ColCur := Connection.Columns("Table_1");

While Not ColCur.Eof Do

For Each Field In ColCur.Fields Do

Debug.WriteLine(Field.Name + " " + Field.Value);

End For;

Debug.WriteLine("");

ColCur.Next;

End While;

ColCur.Close;

End Sub Main;

После выполнения примера будет осуществлено новое подключение к схеме "Test_Schema_MSSQL", расположенной на сервере MSSQL "Test_MSSQL", с указанными учетными данными. Будет получена, и выведена в консоль среды разработки, системная информация о таблице "Table_1", если таковая имеется в данной схеме.

См. также:

ISecurityPackage