Delen via

Procedure: Afzonderlijke X.509-certificaten gebruiken voor ondertekening en versleuteling

  • Artikel

In dit onderwerp wordt beschreven hoe u Windows Communication Foundation (WCF) configureert voor het gebruik van verschillende certificaten voor berichtondertekening en -versleuteling op zowel de client als de service.

Als u wilt dat afzonderlijke certificaten worden gebruikt voor ondertekening en versleuteling, moet er een aangepaste client- of servicereferenties (of beide) worden gemaakt omdat WCF geen API biedt om meerdere client- of servicecertificaten in te stellen. Daarnaast moet een beveiligingstokenbeheerder worden opgegeven om gebruik te maken van de gegevens van meerdere certificaten en om een geschikte beveiligingstokenprovider te maken voor opgegeven sleutelgebruik en berichtrichting.

In het volgende diagram ziet u de gebruikte hoofdklassen, de klassen waaruit ze overnemen (weergegeven met een pijl-omhoog) en de retourtypen van bepaalde methoden en eigenschappen.

Chart showing how client credentials are used

Zie Overzicht: Aangepaste client- en servicereferenties maken voor meer informatie over aangepaste referenties.

Daarnaast moet u een aangepaste identiteitscontrole maken en deze koppelen aan een beveiligingsbindingselement in een aangepaste binding. U moet ook de aangepaste referenties gebruiken in plaats van de standaardreferenties.

In het volgende diagram ziet u de klassen die betrokken zijn bij de aangepaste binding en hoe de aangepaste identiteitsverificator is gekoppeld. Er zijn verschillende bindingselementen betrokken, die allemaal overnemen van BindingElement. De AsymmetricSecurityBindingElement eigenschap heeft de LocalClientSecuritySettings eigenschap, die een exemplaar van IdentityVerifier, waarvan de eigenschap is aangepast, MyIdentityVerifier retourneert.

Chart showing a custom binding element

Zie Procedures voor het maken van een aangepaste identiteitsverificator voor meer informatie over het maken van een aangepaste identiteitsverificator: Een aangepaste clientidentiteitsverificator maken.

Afzonderlijke certificaten gebruiken voor ondertekening en versleuteling

  1. Definieer een nieuwe clientreferentieklasse die de klasse over neemt ClientCredentials . Implementeer vier nieuwe eigenschappen om meerdere certificatenspecificaties toe te staan: ClientSigningCertificate, ClientEncryptingCertificate, ServiceSigningCertificateen ServiceEncryptingCertificate. Overschrijf ook de CreateSecurityTokenManager methode om een exemplaar te retourneren van de aangepaste ClientCredentialsSecurityTokenManager klasse die in de volgende stap is gedefinieerd.

    public class MyClientCredentials : ClientCredentials
{
    X509Certificate2 clientSigningCert;
    X509Certificate2 clientEncryptingCert;
    X509Certificate2 serviceSigningCert;
    X509Certificate2 serviceEncryptingCert;

    public MyClientCredentials()
    {
    }

    protected MyClientCredentials(MyClientCredentials other)
        : base(other)
    {
        this.clientEncryptingCert = other.clientEncryptingCert;
        this.clientSigningCert = other.clientSigningCert;
        this.serviceEncryptingCert = other.serviceEncryptingCert;
        this.serviceSigningCert = other.serviceSigningCert;
    }

    public X509Certificate2 ClientSigningCertificate
    {
        get
        {
            return this.clientSigningCert;
        }
        set
        {
            this.clientSigningCert = value;
        }
    }

    public X509Certificate2 ClientEncryptingCertificate
    {
        get
        {
            return this.clientEncryptingCert;
        }
        set
        {
            this.clientEncryptingCert = value;
        }
    }

    public X509Certificate2 ServiceSigningCertificate
    {
        get
        {
            return this.serviceSigningCert;
        }
        set
        {
            this.serviceSigningCert = value;
        }
    }

    public X509Certificate2 ServiceEncryptingCertificate
    {
        get
        {
            return this.serviceEncryptingCert;
        }
        set
        {
            this.serviceEncryptingCert = value;
        }
    }

    public override SecurityTokenManager CreateSecurityTokenManager()
    {
        return new MyClientCredentialsSecurityTokenManager(this);
    }

    protected override ClientCredentials CloneCore()
    {
        return new MyClientCredentials(this);
    }
}

    Public Class MyClientCredentials
    Inherits ClientCredentials

    Private clientSigningCert As X509Certificate2
    Private clientEncryptingCert As X509Certificate2
    Private serviceSigningCert As X509Certificate2
    Private serviceEncryptingCert As X509Certificate2

    Public Sub New()
    End Sub

    Protected Sub New(ByVal other As MyClientCredentials)
        MyBase.New(other)
        Me.clientEncryptingCert = other.clientEncryptingCert
        Me.clientSigningCert = other.clientSigningCert
        Me.serviceEncryptingCert = other.serviceEncryptingCert
        Me.serviceSigningCert = other.serviceSigningCert
    End Sub

    Public Property ClientSigningCertificate() As X509Certificate2
        Get
            Return Me.clientSigningCert
        End Get
        Set(ByVal value As X509Certificate2)
            Me.clientSigningCert = value
        End Set
    End Property

    Public Property ClientEncryptingCertificate() As X509Certificate2
        Get
            Return Me.clientEncryptingCert
        End Get
        Set(ByVal value As X509Certificate2)
            Me.clientEncryptingCert = value
        End Set
    End Property

    Public Property ServiceSigningCertificate() As X509Certificate2
        Get
            Return Me.serviceSigningCert
        End Get
        Set(ByVal value As X509Certificate2)
            Me.serviceSigningCert = value
        End Set
    End Property

    Public Property ServiceEncryptingCertificate() As X509Certificate2
        Get
            Return Me.serviceEncryptingCert
        End Get
        Set(ByVal value As X509Certificate2)
            Me.serviceEncryptingCert = value
        End Set
    End Property

    Public Overrides Function CreateSecurityTokenManager() As SecurityTokenManager
        Return New MyClientCredentialsSecurityTokenManager(Me)
    End Function

    Protected Overrides Function CloneCore() As ClientCredentials
        Return New MyClientCredentials(Me)
    End Function

End Class

  2. Definieer een nieuw clientbeveiligingstokenbeheer dat wordt overgenomen van de ClientCredentialsSecurityTokenManager klasse. Overschrijf de CreateSecurityTokenProvider methode om een geschikte beveiligingstokenprovider te maken. De requirement parameter (a SecurityTokenRequirement) biedt de berichtrichting en het sleutelgebruik.

    internal class MyClientCredentialsSecurityTokenManager :
    ClientCredentialsSecurityTokenManager
{
    MyClientCredentials credentials;

    public MyClientCredentialsSecurityTokenManager(
        MyClientCredentials credentials): base(credentials)
    {
        this.credentials = credentials;
    }

    public override SecurityTokenProvider CreateSecurityTokenProvider(
        SecurityTokenRequirement requirement)
    {
        SecurityTokenProvider result = null;
        if (requirement.TokenType == SecurityTokenTypes.X509Certificate)
        {
            MessageDirection direction = requirement.GetProperty
                <MessageDirection>(ServiceModelSecurityTokenRequirement.
                MessageDirectionProperty);
            if (direction == MessageDirection.Output)
            {
                if (requirement.KeyUsage == SecurityKeyUsage.Signature)
                {
                    result = new X509SecurityTokenProvider(
                        this.credentials.ClientSigningCertificate);
                }
                else
                {
                    result = new X509SecurityTokenProvider(this.credentials.
                        ServiceEncryptingCertificate);
                }
            }
            else
            {
                if (requirement.KeyUsage == SecurityKeyUsage.Signature)
                {
                    result = new X509SecurityTokenProvider(this.
                        credentials.ServiceSigningCertificate);
                }
                else
                {
                    result = new X509SecurityTokenProvider(credentials.
                        ClientEncryptingCertificate);
                }
            }
        }
        else
        {
            result = base.CreateSecurityTokenProvider(requirement);
        }

        return result;
    }

    public override SecurityTokenAuthenticator
        CreateSecurityTokenAuthenticator(SecurityTokenRequirement
        tokenRequirement, out SecurityTokenResolver outOfBandTokenResolver)
    {
        return base.CreateSecurityTokenAuthenticator(tokenRequirement,
            out outOfBandTokenResolver);
    }
}

    Friend Class MyClientCredentialsSecurityTokenManager
    Inherits ClientCredentialsSecurityTokenManager

    Private credentials As MyClientCredentials

    Public Sub New(ByVal credentials As MyClientCredentials)
        MyBase.New(credentials)
        Me.credentials = credentials
    End Sub

    Public Overrides Function CreateSecurityTokenProvider(ByVal requirement As SecurityTokenRequirement) As SecurityTokenProvider
        Dim result As SecurityTokenProvider = Nothing
        If requirement.TokenType = SecurityTokenTypes.X509Certificate Then
            Dim direction = requirement.GetProperty(Of MessageDirection)(ServiceModelSecurityTokenRequirement.MessageDirectionProperty)
            If direction = MessageDirection.Output Then
                If requirement.KeyUsage = SecurityKeyUsage.Signature Then
                    result = New X509SecurityTokenProvider(Me.credentials.ClientSigningCertificate)
                Else
                    result = New X509SecurityTokenProvider(Me.credentials.ServiceEncryptingCertificate)
                End If
            Else
                If requirement.KeyUsage = SecurityKeyUsage.Signature Then
                    result = New X509SecurityTokenProvider(Me.credentials.ServiceSigningCertificate)
                Else
                    result = New X509SecurityTokenProvider(credentials.ClientEncryptingCertificate)
                End If
            End If
        Else
            result = MyBase.CreateSecurityTokenProvider(requirement)
        End If

        Return result
    End Function

    Public Overrides Function CreateSecurityTokenAuthenticator(ByVal tokenRequirement As SecurityTokenRequirement, _
                                                               <System.Runtime.InteropServices.Out()> ByRef outOfBandTokenResolver As SecurityTokenResolver) As SecurityTokenAuthenticator
        Return MyBase.CreateSecurityTokenAuthenticator(tokenRequirement, _
                                                       outOfBandTokenResolver)
    End Function

End Class

  3. Definieer een nieuwe servicereferentieklasse die de klasse over neemt ServiceCredentials . Implementeer vier nieuwe eigenschappen om meerdere certificatenspecificaties toe te staan: ClientSigningCertificate, ClientEncryptingCertificate, ServiceSigningCertificateen ServiceEncryptingCertificate. Overschrijf ook de CreateSecurityTokenManager methode om een exemplaar te retourneren van de aangepaste ServiceCredentialsSecurityTokenManager klasse die in de volgende stap is gedefinieerd.

    public class MyServiceCredentials : ServiceCredentials
{
    X509Certificate2 clientSigningCert;
    X509Certificate2 clientEncryptingCert;
    X509Certificate2 serviceSigningCert;
    X509Certificate2 serviceEncryptingCert;

    public MyServiceCredentials()
    {
    }

    protected MyServiceCredentials(MyServiceCredentials other)
        : base(other)
    {
        this.clientEncryptingCert = other.clientEncryptingCert;
        this.clientSigningCert = other.clientSigningCert;
        this.serviceEncryptingCert = other.serviceEncryptingCert;
        this.serviceSigningCert = other.serviceSigningCert;
    }

    public X509Certificate2 ClientSigningCertificate
    {
        get
        {
            return this.clientSigningCert;
        }
        set
        {
            this.clientSigningCert = value;
        }
    }

    public X509Certificate2 ClientEncryptingCertificate
    {
        get
        {
            return this.clientEncryptingCert;
        }
        set
        {
            this.clientEncryptingCert = value;
        }
    }

    public X509Certificate2 ServiceSigningCertificate
    {
        get
        {
            return this.serviceSigningCert;
        }
        set
        {
            this.serviceSigningCert = value;
        }
    }

    public X509Certificate2 ServiceEncryptingCertificate
    {
        get
        {
            return this.serviceEncryptingCert;
        }
        set
        {
            this.serviceEncryptingCert = value;
        }
    }

    public override SecurityTokenManager CreateSecurityTokenManager()
    {
        return new MyServiceCredentialsSecurityTokenManager(this);
    }

    protected override ServiceCredentials CloneCore()
    {
        return new MyServiceCredentials(this);
    }
}

    Public Class MyServiceCredentials
    Inherits ServiceCredentials

    Private clientSigningCert As X509Certificate2
    Private clientEncryptingCert As X509Certificate2
    Private serviceSigningCert As X509Certificate2
    Private serviceEncryptingCert As X509Certificate2

    Public Sub New()
    End Sub

    Protected Sub New(ByVal other As MyServiceCredentials)
        MyBase.New(other)
        Me.clientEncryptingCert = other.clientEncryptingCert
        Me.clientSigningCert = other.clientSigningCert
        Me.serviceEncryptingCert = other.serviceEncryptingCert
        Me.serviceSigningCert = other.serviceSigningCert
    End Sub

    Public Property ClientSigningCertificate() As X509Certificate2
        Get
            Return Me.clientSigningCert
        End Get
        Set(ByVal value As X509Certificate2)
            Me.clientSigningCert = value
        End Set
    End Property

    Public Property ClientEncryptingCertificate() As X509Certificate2
        Get
            Return Me.clientEncryptingCert
        End Get
        Set(ByVal value As X509Certificate2)
            Me.clientEncryptingCert = value
        End Set
    End Property

    Public Property ServiceSigningCertificate() As X509Certificate2
        Get
            Return Me.serviceSigningCert
        End Get
        Set(ByVal value As X509Certificate2)
            Me.serviceSigningCert = value
        End Set
    End Property

    Public Property ServiceEncryptingCertificate() As X509Certificate2
        Get
            Return Me.serviceEncryptingCert
        End Get
        Set(ByVal value As X509Certificate2)
            Me.serviceEncryptingCert = value
        End Set
    End Property

    Public Overrides Function CreateSecurityTokenManager() As SecurityTokenManager
        Return New MyServiceCredentialsSecurityTokenManager(Me)
    End Function

    Protected Overrides Function CloneCore() As ServiceCredentials
        Return New MyServiceCredentials(Me)
    End Function

End Class

  4. Definieer een nieuw servicebeveiligingstokenbeheer dat wordt overgenomen van de ServiceCredentialsSecurityTokenManager klasse. Overschrijf de CreateSecurityTokenProvider methode om een geschikte beveiligingstokenprovider te maken op basis van de doorgegeven berichtrichting en het sleutelgebruik.

    internal class MyServiceCredentialsSecurityTokenManager :
    ServiceCredentialsSecurityTokenManager
{
    MyServiceCredentials credentials;

    public MyServiceCredentialsSecurityTokenManager(
        MyServiceCredentials credentials)
        : base(credentials)
    {
        this.credentials = credentials;
    }

    public override SecurityTokenProvider CreateSecurityTokenProvider(
        SecurityTokenRequirement requirement)
    {
        SecurityTokenProvider result = null;
        if (requirement.TokenType == SecurityTokenTypes.X509Certificate)
        {
            MessageDirection direction = requirement.
                GetProperty<MessageDirection>(
                ServiceModelSecurityTokenRequirement.
                MessageDirectionProperty);
            if (direction == MessageDirection.Input)
            {
                if (requirement.KeyUsage == SecurityKeyUsage.Exchange)
                {
                    result = new X509SecurityTokenProvider(
                        credentials.ServiceEncryptingCertificate);
                }
                else
                {
                    result = new X509SecurityTokenProvider(
                        credentials.ClientSigningCertificate);
                }
            }
            else
            {
                if (requirement.KeyUsage == SecurityKeyUsage.Signature)
                {
                    result = new X509SecurityTokenProvider(
                        credentials.ServiceSigningCertificate);
                }
                else
                {
                    result = new X509SecurityTokenProvider(
                        credentials.ClientEncryptingCertificate);
                }
            }
        }
        else
        {
            result = base.CreateSecurityTokenProvider(requirement);
        }
        return result;
    }
}

    Friend Class MyServiceCredentialsSecurityTokenManager
    Inherits ServiceCredentialsSecurityTokenManager

    Private credentials As MyServiceCredentials

    Public Sub New(ByVal credentials As MyServiceCredentials)
        MyBase.New(credentials)
        Me.credentials = credentials
    End Sub

    Public Overrides Function CreateSecurityTokenProvider(ByVal requirement As SecurityTokenRequirement) As SecurityTokenProvider
        Dim result As SecurityTokenProvider = Nothing
        If requirement.TokenType = SecurityTokenTypes.X509Certificate Then
            Dim direction = requirement.GetProperty(Of MessageDirection)(ServiceModelSecurityTokenRequirement.MessageDirectionProperty)
            If direction = MessageDirection.Input Then
                If requirement.KeyUsage = SecurityKeyUsage.Exchange Then
                    result = New X509SecurityTokenProvider(credentials.ServiceEncryptingCertificate)
                Else
                    result = New X509SecurityTokenProvider(credentials.ClientSigningCertificate)
                End If
            Else
                If requirement.KeyUsage = SecurityKeyUsage.Signature Then
                    result = New X509SecurityTokenProvider(credentials.ServiceSigningCertificate)
                Else
                    result = New X509SecurityTokenProvider(credentials.ClientEncryptingCertificate)
                End If
            End If
        Else
            result = MyBase.CreateSecurityTokenProvider(requirement)
        End If
        Return result
    End Function

End Class

Meerdere certificaten op de client gebruiken

  1. Maak een aangepaste binding. Het beveiligingsbindingselement moet worden uitgevoerd in de duplexmodus, zodat verschillende beveiligingstokenproviders aanwezig kunnen zijn voor aanvragen en antwoorden. Een manier om dit te doen, is door gebruik te maken van een dubbelzijdig transport of om de CompositeDuplexBindingElement zoals weergegeven in de volgende code te gebruiken. Koppel de aangepaste IdentityVerifier waarde die in de volgende stap is gedefinieerd aan het beveiligingsbindingselement. Vervang de standaardclientreferenties door de aangepaste clientreferenties die u eerder hebt gemaakt.

                EndpointAddress serviceEndpoint =
                new EndpointAddress(new Uri("http://localhost:6060/service"));

            CustomBinding binding = new CustomBinding();

            AsymmetricSecurityBindingElement securityBE =
                SecurityBindingElement.CreateMutualCertificateDuplexBindingElement(
                MessageSecurityVersion.
WSSecurity10WSTrustFebruary2005WSSecureConversationFebruary2005WSSecurityPolicy11BasicSecurityProfile10);
            // Add a custom IdentityVerifier because the service uses two certificates
            // (one for signing and one for encryption) and an endpoint identity that
            // contains a single identity claim.
            securityBE.LocalClientSettings.IdentityVerifier = new MyIdentityVerifier();
            binding.Elements.Add(securityBE);

            CompositeDuplexBindingElement compositeDuplex =
                new CompositeDuplexBindingElement();
            compositeDuplex.ClientBaseAddress = new Uri("http://localhost:6061/client");
            binding.Elements.Add(compositeDuplex);

            binding.Elements.Add(new OneWayBindingElement());

            binding.Elements.Add(new HttpTransportBindingElement());

            using (ChannelFactory<IMyServiceChannel> factory =
                new ChannelFactory<IMyServiceChannel>(binding, serviceEndpoint))
            {
                MyClientCredentials credentials = new MyClientCredentials();
                SetupCertificates(credentials);
                factory.Endpoint.Behaviors.Remove(typeof(ClientCredentials));
                factory.Endpoint.Behaviors.Add(credentials);

                IMyServiceChannel channel = factory.CreateChannel();
                Console.WriteLine(channel.Hello("world"));
                channel.Close();
            }

    Dim serviceEndpoint As New EndpointAddress(New Uri("http://localhost:6060/service"))

Dim binding As New CustomBinding()

Dim securityBE = SecurityBindingElement.CreateMutualCertificateDuplexBindingElement(MessageSecurityVersion.WSSecurity10WSTrustFebruary2005WSSecureConversationFebruary2005WSSecurityPolicy11BasicSecurityProfile10)
' Add a custom IdentityVerifier because the service uses two certificates 
' (one for signing and one for encryption) and an endpoint identity that 
' contains a single identity claim.
securityBE.LocalClientSettings.IdentityVerifier = New MyIdentityVerifier()
binding.Elements.Add(securityBE)

Dim compositeDuplex As New CompositeDuplexBindingElement()

compositeDuplex.ClientBaseAddress = New Uri("http://localhost:6061/client")

With binding.Elements
    .Add(compositeDuplex)
    .Add(New OneWayBindingElement())
    .Add(New HttpTransportBindingElement())
End With

Using factory As New ChannelFactory(Of IMyServiceChannel)(binding, serviceEndpoint)
    Dim credentials As New MyClientCredentials()
    SetupCertificates(credentials)

    With factory.Endpoint.Behaviors
        .Remove(GetType(ClientCredentials))
        .Add(credentials)
    End With

    Dim channel = factory.CreateChannel()
    Console.WriteLine(channel.Hello("world"))
    channel.Close()
End Using

  2. Definieer een aangepaste IdentityVerifier. De service heeft meerdere identiteiten omdat verschillende certificaten worden gebruikt om de aanvraag te versleutelen en het antwoord te ondertekenen.

    Notitie

    In het volgende voorbeeld voert de opgegeven aangepaste identiteitscontrole geen eindpuntidentiteitscontrole uit voor demonstratiedoeleinden. Dit wordt niet aanbevolen voor productiecode.

    class MyIdentityVerifier : IdentityVerifier
{
    IdentityVerifier defaultVerifier;

    public MyIdentityVerifier()
    {
        this.defaultVerifier = IdentityVerifier.CreateDefault();
    }

    public override bool CheckAccess(EndpointIdentity identity,
        AuthorizationContext authContext)
    {
        // The following implementation is for demonstration only, and
        // does not perform any checks regarding EndpointIdentity.
        // Do not use this for production code.
        return true;
    }

    public override bool TryGetIdentity(EndpointAddress reference,
        out EndpointIdentity identity)
    {
        return this.defaultVerifier.TryGetIdentity(reference, out identity);
    }
}


    Friend Class MyIdentityVerifier
    Inherits IdentityVerifier

    Private defaultVerifier As IdentityVerifier

    Public Sub New()
        Me.defaultVerifier = IdentityVerifier.CreateDefault()
    End Sub

    Public Overrides Function CheckAccess(ByVal identity As EndpointIdentity, ByVal authContext As AuthorizationContext) As Boolean
        ' The following implementation is for demonstration only, and
        ' does not perform any checks regarding EndpointIdentity.
        ' Do not use this for production code.
        Return True
    End Function

    Public Overrides Function TryGetIdentity(ByVal reference As EndpointAddress, <System.Runtime.InteropServices.Out()> ByRef identity As EndpointIdentity) As Boolean
        Return Me.defaultVerifier.TryGetIdentity(reference, identity)
    End Function

End Class

Meerdere certificaten op de service gebruiken

  1. Maak een aangepaste binding. Het beveiligingsbindingselement moet in een duplexmodus worden uitgevoerd, zodat verschillende beveiligingstokenproviders aanwezig kunnen zijn voor aanvragen en antwoorden. Net als bij de client gebruikt u een dubbelzijdig transport of gebruik CompositeDuplexBindingElement , zoals wordt weergegeven in de volgende code. Vervang de standaardservicereferenties door de aangepaste servicereferenties die u eerder hebt gemaakt.

                Uri serviceEndpoint = new Uri("http://localhost:6060/service");
            using (ServiceHost host = new ServiceHost(typeof(Service), serviceEndpoint))
            {
                CustomBinding binding = new CustomBinding();
                binding.Elements.Add(SecurityBindingElement.
                    CreateMutualCertificateDuplexBindingElement(
MessageSecurityVersion.WSSecurity10WSTrustFebruary2005WSSecureConversationFebruary2005WSSecurityPolicy11BasicSecurityProfile10));
                binding.Elements.Add(new CompositeDuplexBindingElement());
                binding.Elements.Add(new OneWayBindingElement());
                binding.Elements.Add(new HttpTransportBindingElement());

                MyServiceCredentials credentials = new MyServiceCredentials();
                SetupCertificates(credentials);
                host.Description.Behaviors.Remove(typeof(ServiceCredentials));
                host.Description.Behaviors.Add(credentials);

                ServiceEndpoint endpoint = host.AddServiceEndpoint(
                    typeof(IMyService), binding, "");
                host.Open();

                Console.WriteLine("Service started, press ENTER to stop...");
                Console.ReadLine();
            }

    Dim serviceEndpoint As New Uri("http://localhost:6060/service")
Using host As New ServiceHost(GetType(Service), serviceEndpoint)
    Dim binding As New CustomBinding()

    With binding.Elements
        .Add(SecurityBindingElement.CreateMutualCertificateDuplexBindingElement(MessageSecurityVersion.WSSecurity10WSTrustFebruary2005WSSecureConversationFebruary2005WSSecurityPolicy11BasicSecurityProfile10))
        .Add(New CompositeDuplexBindingElement())
        .Add(New OneWayBindingElement())
        .Add(New HttpTransportBindingElement())
    End With

    Dim credentials As New MyServiceCredentials()
    SetupCertificates(credentials)
    With host.Description.Behaviors
        .Remove(GetType(ServiceCredentials))
        .Add(credentials)
    End With

    Dim endpoint = host.AddServiceEndpoint(GetType(IMyService), binding, "")
    host.Open()

    Console.WriteLine("Service started, press ENTER to stop...")
    Console.ReadLine()
End Using

Zie ook