ICertificates.Add

Синтаксис Fore

Add(Id: String): ICertificate;

Синтаксис Fore.NET

Add(Id: String): Prognoz.Platform.Interop.Metabase.ICertificate;

Параметры

Id. Идентификатор, который будет присвоен сертификату.

Описание

Метод Add добавляет сертификат в коллекцию и возвращает его параметры.

Пример Fore

Для выполнения примера предполагается наличие файла с наименованием «sp.pem», в котором хранится сертификат безопасности.

Sub UserProc;
Var
    MB: IMetabase;
    MSecurity: IMetabaseSecurity;
    Certs: ICertificates;
    Cert: ICertificate;
    FStream: IFileStream;
Begin
    MB := MetabaseClass.Active;
    MSecurity := MB.Security;
    Certs := MSecurity.Policy.Certificates;
    //Добавление сертификата
    Cert := Certs.Add("sp");
    //Загрузка содержимого сертификата из файла
    FStream := New FileStream.Create("D:\Work\Certificates\sp.pem", FileOpenMode.Read, FileShare.DenyNone);
    Cert.SetData(FStream);
    //Применение изменений
    MSecurity.Apply;
End Sub UserProc;

При выполнении примера в базу репозитория будет добавлен сертификат безопасности. Содержимое сертификата будет загружено из указанного файла.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Imports System.IO;
Imports Prognoz.Platform.Interop.Metabase;

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    MSecurity: IMetabaseSecurity;
    Certs: ICertificates;
    Cert: ICertificate;
    FStream: FileStream;
Begin
    MB := Params.Metabase;
    MSecurity := MB.Security;
    Certs := MSecurity.Policy.Certificates;
    //Добавление сертификата
    Cert := Certs.Add("sp");
    //Загрузка содержимого сертификата из файла
    FStream := New FileStream("D:\Work\Certificates\sp.pem", FileMode.Open, FileAccess.Read);
    Cert.SetData(FStream);
    //Применение изменений
    MSecurity.Apply();
End Sub;

См. также:

ICertificates