LogonData: ISecurityPackageLogonData;
Свойство LogonData возвращает дополнительные параметры модуля безопасности, содержащего настройки, используемые при подключении к серверу баз данных.
Sub Main;
Var
MB: IMetabase;
CrInfo: IMetabaseObjectCreateInfo;
MObj: IMetabaseObject;
DB: IDatabase;
Begin
MB := MetabaseClass.Active;
CrInfo := MB.CreateCreateInfo;
CrInfo.ClassID := MetabaseObjectClass.KE_CLASS_DATABASE;
CrInfo.Id := "NewBD";
CrInfo.Name := "Новая база данных";
CrInfo.Parent := MB.Root;
MObj := MB.CreateObject(CrInfo).Edit;
DB := MObj As IDatabase;
DB.Authentication := AuthenticationMode.Password;
DB.DriverId := "ORCL";
DB.LogonData.ParamValue("SERVER") := "Test";
DB.LogonData.ParamValue("SCHEME") := "TestShema";
MObj.Save;
End Sub Main;
После выполнения примера в корневом каталоге репозитория будет создана новая база данных. Данные будут располагаться на сервере "Test" в схеме "TestShema".
См. также: