IPasswordCredentials.UserName

Синтаксис

UserName: String;

Описание

Свойство UserName определяет имя пользователя, под которым будет осуществлено подключение.

Пример

Для выполнения примера на форме должны быть расположены EditBox1 и EditBox2 типа EditBox. В схеме должна быть таблица с идентификатором Table. Пользователь, под которым осуществляется подключение, должен быть добавлен в список пользователей репозитория и иметь привилегии «Вход в систему» и «Право чтения и открытия всех объектов».

Sub UserProc;

Var

MbDef: IMetabaseDefinition;

Package: ISecurityPackage;

PC: IPasswordCredentials;

Mb: IMetabase;

MbManager: IMetabaseManager;

Table : ITable;

Field : ITableField;

Begin

Mb := Null;

MbManager := MetabaseManagerFactory.Active;

MbDef := MbManager.Definitions.FindById("p5bash");

Debug.AssertMsg(MbDef <> Null, "Описание метабазы не найдено");

Package := MbManager.Packs.FindById(MbDef.SecurityPackage).Package;

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

PC.UserName := EditBox1.Text;

PC.Password := EditBox2.Text;

Mb := MbDef.Open(PC,ApplicationMode.Win,LocaleCodeID.Russian);

WinApplication.InformationBox("Подключение осуществлено");

Table := Mb.ItemById ("Table").Bind As ITable;

For Each Field In Table.Fields Do

Debug.WriteLine(Field.Name);

End For;

End Sub UserProc;

При указании верного пароля и имени пользователя будет осуществлено подключение к схеме "p5bash", будет выдано сообщение об этом. В окно консоли будут выведены наименования полей таблицы.

См. также:

IPasswordCredentials