本文整理汇总了VB.NET中System.ServiceModel.Security.X509ClientCertificateAuthentication.CertificateValidationMode属性的典型用法代码示例。如果您正苦于以下问题:VB.NET X509ClientCertificateAuthentication.CertificateValidationMode属性的具体用法?VB.NET X509ClientCertificateAuthentication.CertificateValidationMode怎么用?VB.NET X509ClientCertificateAuthentication.CertificateValidationMode使用的例子?那么, 这里精选的属性代码示例或许可以为您提供帮助。您也可以进一步了解该属性所在类System.ServiceModel.Security.X509ClientCertificateAuthentication
的用法示例。
在下文中一共展示了X509ClientCertificateAuthentication.CertificateValidationMode属性的1个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: Uri
' Create a service host.
Dim httpUri As New Uri("http://localhost/Calculator")
Dim sh As New ServiceHost(GetType(Calculator), httpUri)
' Create a binding that uses a certificate.
Dim b As New WSHttpBinding(SecurityMode.Message)
b.Security.Message.ClientCredentialType = _
MessageCredentialType.Certificate
' Get a reference to the authentication object.
Dim myAuthProperties As X509ClientCertificateAuthentication = _
sh.Credentials.ClientCertificate.Authentication()
Select Case myAuthProperties.CertificateValidationMode
Case X509CertificateValidationMode.ChainTrust
Console.WriteLine("ChainTrust")
Case X509CertificateValidationMode.Custom
Console.WriteLine("Custom")
Case X509CertificateValidationMode.None
Console.WriteLine("ChainTrust")
Case X509CertificateValidationMode.PeerOrChainTrust
Console.WriteLine("PeerOrChainTrust")
Case X509CertificateValidationMode.PeerTrust
Console.WriteLine("PeerTrust")
Case Else
Console.WriteLine("Default")
End Select
开发者ID:VB.NET开发者,项目名称:System.ServiceModel.Security,代码行数:27,代码来源:X509ClientCertificateAuthentication.CertificateValidationMode