OpenWithCredentials(Credentials: ICredentials): IAdoMdCatalogInstance;
OpenWithCredentials(Credentials: Prognoz.Platform.Interop.Metabase.ICredentials): Prognoz.Platform.Interop.AdoMd.IAdoMdCatalogInstance;
Credentials. Учетные данные, используемые при открытии каталога.
Метод OpenWithCredentials осуществляет открытие каталога ADOMD с указанными учетными данными.
Для выполнения примера предполагается наличие в репозитории каталога ADOMD с идентификатором «SAP_test».
Sub UserProc;
Var
MB: IMetabase;
SecPackage: ISecurityPackage;
Creds: IPasswordCredentials;
Catalog: IAdoMdCatalog;
CatalogInst: IAdoMdCatalogInstance;
Begin
MB := MetabaseClass.Active;
Catalog := MB.ItemById("SAP_test").Bind As IAdoMdCatalog;
SecPackage := New StandardSecurityPackage.Create;
Creds := SecPackage.CreateCredentials(AuthenticationMode.Password) As IPasswordCredentials;
Creds.UserName := "User";
Creds.Password := "Password";
CatalogInst := Catalog.OpenWithCredentials(Creds);
End Sub UserProc;
После выполнения примера будет осуществлено открытие каталога ADOMD с указанными учетными данными.
Для выполнения примера предполагается наличие в репозитории каталога ADOMD с идентификатором «SAP_test». Указанный пример является точкой входа для .NET-сборки.
Imports Prognoz.Platform.Interop.AdoMd;
Imports Prognoz.Platform.Interop.Metabase;
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
SecPackage: StandardSecurityPackageClass = New StandardSecurityPackageClass();
Creds: IPasswordCredentials;
Catalog: IAdoMdCatalog;
CatalogInst: IAdoMdCatalogInstance;
Begin
MB := Params.Metabase;
Catalog := MB.ItemById["SAP_test"].Bind() As IAdoMdCatalog;
Creds := SecPackage.CreateCredentials(AuthenticationMode.amPassword) As IPasswordCredentials;
Creds.UserName := "User";
Creds.Password := "Password";
CatalogInst := Catalog.OpenWithCredentials(Creds);
End Sub;
После выполнения примера будет осуществлено открытие каталога ADOMD с указанными учетными данными.
См. также: