// Shows how to get the subject name of application certificates.
using System;
using Microsoft.Extensions.DependencyInjection;
using OpcLabs.EasyOpc.UA;
using OpcLabs.EasyOpc.UA.Application;
using OpcLabs.EasyOpc.UA.Application.Extensions;
namespace UADocExamples.Application._IEasyUAClientApplication
{
    class GetCertificateSubjectName
    {
        public static void Main1()
        {
            // Obtain the client application service.
            var client = new EasyUAClient();
            IEasyUAClientApplication clientApplication = client.GetService<IEasyUAClientApplication>();
            // Get the subject name of application certificates.
            string certificateSubjectName = clientApplication.GetCertificateSubjectName();
            // Display results
            Console.WriteLine("Certificate subject name: {0}", certificateSubjectName);
        }
    }
}
	 
	
		// Shows how to get the subject name of application certificates.
class procedure GetCertificateSubjectName.Main;
var
  CertificateSubjectName: string;
  Client: _EasyUAClient;
  ClientApplication: _EasyUAClientApplication;
begin
  // Obtain the client application service.
  Client := CoEasyUAClient.Create;
  ClientApplication := IInterface(Client.GetServiceByName('OpcLabs.EasyOpc.UA.Application.IEasyUAClientApplication, OpcLabs.EasyOpcUA')) as _EasyUAClientApplication;
  // Get the subject name of application certificates.
  CertificateSubjectName := ClientApplication.GetCertificateSubjectName();
  // Display results
  WriteLn('Certificate subject name: ', CertificateSubjectName);
end;
	 
	
		' Shows how to get the subject name of application certificates.
Imports Microsoft.Extensions.DependencyInjection
Imports OpcLabs.EasyOpc.UA
Imports OpcLabs.EasyOpc.UA.Application
Imports OpcLabs.EasyOpc.UA.Application.Extensions
Namespace UADocExamples.Application._IEasyUAClientApplication
    Friend Class GetCertificateSubjectName
        Public Shared Sub Main1()
            ' Obtain the client application service.
            Dim client = New EasyUAClient()
            Dim clientApplication = client.GetService(Of IEasyUAClientApplication)()
            ' Get the subject name of application certificates.
            Dim certificateSubjectName = clientApplication.GetCertificateSubjectName()
            ' Display results
            Console.WriteLine("Certificate subject name: {0}", certificateSubjectName)
        End Sub
    End Class
End Namespace