Просмотр исходного текста страницы VB.Net by API/System.Security.Cryptography.X509Certificates/X509Certificate

==X509Certificate.CreateFromCertFile==


   
<source lang="vbnet">  
Imports System.Security.Principal
Imports System.Security.Permissions
Imports System.IO
Imports System.Diagnostics
Imports System.Security.Cryptography.X509Certificates
public class MainClass
   Shared Public Sub Main(ByVal CmdArgs() As String)
        If CmdArgs.Length <> 1 Then
            Console.Write("usage loadCert <cert file> ")
            End
        End If
        Dim cert As X509Certificate = _
        X509Certificate.CreateFromCertFile(CmdArgs(0))
        Console.WriteLine("hash= {0}", cert.GetCertHashString())
        Console.WriteLine("effective Date= {0}", _
        cert.GetEffectiveDateString())
        Console.WriteLine("expire Date= {0}", _
        cert.GetExpirationDateString())
        Console.WriteLine("Issued By= {0}", cert.GetIssuerName())
        Console.WriteLine("Issued To= {0}", cert.GetName())
        Console.WriteLine("algo= {0}", cert.GetKeyAlgorithm())
        Console.WriteLine("Pub Key= {0}", cert.GetPublicKeyString())
    End Sub
End Class
   
    
  </source>


==X509Certificate.GetCertHashString()==


   
<source lang="vbnet">  
Imports System.Security.Principal
Imports System.Security.Permissions
Imports System.IO
Imports System.Diagnostics
Imports System.Security.Cryptography.X509Certificates
public class MainClass
   Shared Public Sub Main(ByVal CmdArgs() As String)
        If CmdArgs.Length <> 1 Then
            Console.Write("usage loadCert <cert file> ")
            End
        End If
        Dim cert As X509Certificate = _
        X509Certificate.CreateFromCertFile(CmdArgs(0))
        Console.WriteLine("hash= {0}", cert.GetCertHashString())
        Console.WriteLine("effective Date= {0}", _
        cert.GetEffectiveDateString())
        Console.WriteLine("expire Date= {0}", _
        cert.GetExpirationDateString())
        Console.WriteLine("Issued By= {0}", cert.GetIssuerName())
        Console.WriteLine("Issued To= {0}", cert.GetName())
        Console.WriteLine("algo= {0}", cert.GetKeyAlgorithm())
        Console.WriteLine("Pub Key= {0}", cert.GetPublicKeyString())
    End Sub
End Class
   
    
  </source>


==X509Certificate.GetKeyAlgorithm()==


   
<source lang="vbnet">  
Imports System.Security.Principal
Imports System.Security.Permissions
Imports System.IO
Imports System.Diagnostics
Imports System.Security.Cryptography.X509Certificates
public class MainClass
   Shared Public Sub Main(ByVal CmdArgs() As String)
        If CmdArgs.Length <> 1 Then
            Console.Write("usage loadCert <cert file> ")
            End
        End If
        Dim cert As X509Certificate = _
        X509Certificate.CreateFromCertFile(CmdArgs(0))
        Console.WriteLine("hash= {0}", cert.GetCertHashString())
        Console.WriteLine("effective Date= {0}", _
        cert.GetEffectiveDateString())
        Console.WriteLine("expire Date= {0}", _
        cert.GetExpirationDateString())
        Console.WriteLine("Issued By= {0}", cert.GetIssuerName())
        Console.WriteLine("Issued To= {0}", cert.GetName())
        Console.WriteLine("algo= {0}", cert.GetKeyAlgorithm())
        Console.WriteLine("Pub Key= {0}", cert.GetPublicKeyString())
    End Sub
End Class
   
    
  </source>


==X509Certificate.GetPublicKeyString()==


   
<source lang="vbnet">  
Imports System.Security.Principal
Imports System.Security.Permissions
Imports System.IO
Imports System.Diagnostics
Imports System.Security.Cryptography.X509Certificates
public class MainClass
   Shared Public Sub Main(ByVal CmdArgs() As String)
        If CmdArgs.Length <> 1 Then
            Console.Write("usage loadCert <cert file> ")
            End
        End If
        Dim cert As X509Certificate = _
        X509Certificate.CreateFromCertFile(CmdArgs(0))
        Console.WriteLine("hash= {0}", cert.GetCertHashString())
        Console.WriteLine("effective Date= {0}", _
        cert.GetEffectiveDateString())
        Console.WriteLine("expire Date= {0}", _
        cert.GetExpirationDateString())
        Console.WriteLine("Issued By= {0}", cert.GetIssuerName())
        Console.WriteLine("Issued To= {0}", cert.GetName())
        Console.WriteLine("algo= {0}", cert.GetKeyAlgorithm())
        Console.WriteLine("Pub Key= {0}", cert.GetPublicKeyString())
    End Sub
End Class
   
    
  </source>